inherited fmFoodFlowRate: TfmFoodFlowRate
  Left = 454
  Top = 101
  Width = 1420
  Height = 892
  Caption = #1056#1072#1089#1093#1086#1076' '#1087#1088#1086#1076#1091#1082#1090#1086#1074' '#1087#1080#1090#1072#1085#1080#1103' '#1079#1072' '#1087#1077#1088#1080#1086#1076
  Visible = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  inherited sbBottom: TStatusBar
    Top = 827
    Width = 1404
  end
  inherited Panel1: TPanel
    Width = 1404
    Visible = False
    inherited BitBtn1: TBitBtn
      Left = 1242
    end
    inherited BitBtn2: TBitBtn
      Left = 1330
    end
    object tbFilterMenu: TcxButton
      Tag = 12
      Left = 504
      Top = 8
      Width = 137
      Height = 31
      Hint = #1048#1089#1082#1072#1090#1100
      Caption = #1048#1089#1082#1072#1090#1100
      Enabled = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      TabStop = False
      OnClick = tbFilterMenuClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777077777777777777787777777777777700077777777
        777778887777777777770F00077777777777878887777777777770F000777777
        77777878887777777777770F00078000877777878887F888F7777770F0008888
        807777787888FFFFF87777770007777778077777888777777F877777707777FF
        F78877777877777777FF777770777777FF707777787777777778777770777777
        7F7077777877777777787777788FF777777077777FF7777777787777788FF777
        777877777FF77777777F777778087777780777777F8F77777F87777777708888
        807777777778FFFFF877777777778000877777777777F888F777}
      LookAndFeel.SkinName = 'Blue'
      NumGlyphs = 2
    end
  end
  object Panel3: TPanel [2]
    Left = 0
    Top = 45
    Width = 1404
    Height = 27
    Align = alTop
    Caption = 'Panel3'
    TabOrder = 4
    object dxBarDockControl4: TdxBarDockControl
      Left = 1
      Top = 1
      Width = 1402
      Height = 26
      Align = dalTop
      BarManager = dxBarManager1
    end
  end
  object Panel6: TPanel [3]
    Left = 0
    Top = 72
    Width = 401
    Height = 755
    Align = alLeft
    Caption = 'Panel6'
    Constraints.MinWidth = 401
    TabOrder = 6
    object pcFood: TcxPageControl
      Left = 1
      Top = 27
      Width = 399
      Height = 727
      ActivePage = tsProd
      Align = alClient
      TabOrder = 0
      OnChange = pcFoodChange
      ClientRectBottom = 726
      ClientRectLeft = 1
      ClientRectRight = 398
      ClientRectTop = 21
      object tsProd: TcxTabSheet
        Caption = #1056#1072#1089#1095#1077#1090' '#1087#1088#1086#1076#1091#1082#1090#1086#1074
        ImageIndex = 0
        object tbFilterCont: TcxButton
          Tag = 12
          Left = 297
          Top = 1
          Width = 88
          Height = 21
          Hint = #1048#1089#1082#1072#1090#1100
          Caption = #1056#1072#1089#1089#1095#1080#1090#1072#1090#1100
          Enabled = False
          ParentShowHint = False
          ShowHint = True
          TabOrder = 0
          TabStop = False
          OnClick = tbFilterContClick
          LookAndFeel.SkinName = 'Blue'
        end
        object dbgFoodFactor: TcxGrid
          Left = 0
          Top = 0
          Width = 397
          Height = 705
          Align = alClient
          BevelEdges = [beTop, beRight, beBottom]
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          LookAndFeel.Kind = lfStandard
          object tvFoodFactor: TcxGridDBTableView
            NavigatorButtons.ConfirmDelete = False
            NavigatorButtons.First.Visible = True
            NavigatorButtons.PriorPage.Visible = True
            NavigatorButtons.Prior.Visible = True
            NavigatorButtons.Next.Visible = True
            NavigatorButtons.NextPage.Visible = True
            NavigatorButtons.Last.Visible = True
            NavigatorButtons.Insert.Visible = False
            NavigatorButtons.Append.Visible = False
            NavigatorButtons.Delete.Visible = False
            NavigatorButtons.Edit.Visible = False
            NavigatorButtons.Post.Visible = False
            NavigatorButtons.Cancel.Visible = False
            NavigatorButtons.Refresh.Visible = False
            NavigatorButtons.SaveBookmark.Visible = False
            NavigatorButtons.GotoBookmark.Visible = False
            NavigatorButtons.Filter.Visible = False
            FilterBox.Position = fpTop
            DataController.DataSource = dsSumCont
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <>
            OptionsBehavior.CellHints = True
            OptionsBehavior.IncSearch = True
            OptionsCustomize.ColumnFiltering = False
            OptionsCustomize.ColumnGrouping = False
            OptionsData.CancelOnExit = False
            OptionsData.Deleting = False
            OptionsData.DeletingConfirmation = False
            OptionsData.Editing = False
            OptionsData.Inserting = False
            OptionsView.NavigatorOffset = 10
            OptionsView.CellAutoHeight = True
            OptionsView.CellTextMaxLineCount = 1
            OptionsView.ColumnAutoWidth = True
            OptionsView.GroupByBox = False
            OptionsView.Indicator = True
            Preview.Visible = True
            Styles.IncSearch = DMInv.cxKrasniyText
            Styles.Selection = DMInv.cxJoltiyFon
            Styles.Header = DMInv.cxSiniyText
            object tvFoodFactorSDNAME: TcxGridDBColumn
              Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1087#1088#1086#1076#1091#1082#1090#1072
              DataBinding.FieldName = 'SDNAME'
              Width = 186
            end
            object tvFoodFactorSBRUTTO: TcxGridDBColumn
              Caption = #1041#1088#1091#1090#1090#1086' ('#1082#1075')'
              DataBinding.FieldName = 'SBRUTTO'
              PropertiesClassName = 'TcxCurrencyEditProperties'
              Properties.DisplayFormat = ',0.000'#39#39';-,0.000'#39#39
              Width = 97
            end
            object tvFoodFactorSNETTO: TcxGridDBColumn
              Caption = #1053#1077#1090#1090#1086' ('#1082#1075')'
              DataBinding.FieldName = 'SNETTO'
              PropertiesClassName = 'TcxCurrencyEditProperties'
              Properties.DisplayFormat = ',0.000'#39#39';-,0.000'#39#39
              Width = 96
            end
          end
          object cxGridLevel1: TcxGridLevel
            GridView = tvFoodFactor
          end
        end
      end
      object tsTK: TcxTabSheet
        Caption = #1058#1077#1093#1085'. '#1082#1072#1088#1090#1072' '#1073#1083#1102#1076#1072
        ImageIndex = 1
        object Panel2: TPanel
          Left = 0
          Top = 0
          Width = 397
          Height = 82
          Align = alTop
          TabOrder = 0
          object eNameMap: TLabel
            Left = 10
            Top = 11
            Width = 371
            Height = 13
            Caption = '_____________________________________________________'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clGray
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object Label8: TLabel
            Left = 10
            Top = 37
            Width = 136
            Height = 13
            Caption = #1042#1077#1089' '#1075#1086#1090#1086#1074#1086#1081' '#1087#1086#1088#1094#1080#1080', '#1075#1088':'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clGray
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object Panel4: TPanel
            Left = 1
            Top = 57
            Width = 395
            Height = 24
            Align = alBottom
            TabOrder = 0
            object Label1: TLabel
              Left = 9
              Top = 5
              Width = 224
              Height = 13
              Caption = 'C'#1086#1089#1090#1072#1074' '#1087#1088#1086#1076#1091#1082#1090#1086#1074' '#1076#1083#1103' '#1087#1088#1086#1080#1079#1074#1086#1076#1089#1090#1074#1072':'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clGray
              Font.Height = -11
              Font.Name = 'Tahoma'
              Font.Style = [fsBold]
              ParentFont = False
            end
          end
          object cxDBTextEdit1: TcxDBTextEdit
            Left = 168
            Top = 30
            AutoSize = False
            DataBinding.DataField = 'YIELD'
            DataBinding.DataSource = dsTechMap
            Properties.ReadOnly = True
            TabOrder = 1
            Height = 21
            Width = 49
          end
        end
        object dbgProd: TcxGrid
          Left = 0
          Top = 82
          Width = 397
          Height = 402
          Align = alClient
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          LookAndFeel.Kind = lfStandard
          object tvProd: TcxGridDBTableView
            NavigatorButtons.ConfirmDelete = False
            NavigatorButtons.First.Visible = True
            NavigatorButtons.PriorPage.Visible = True
            NavigatorButtons.Prior.Visible = True
            NavigatorButtons.Next.Visible = True
            NavigatorButtons.NextPage.Visible = True
            NavigatorButtons.Last.Visible = True
            NavigatorButtons.Insert.Visible = False
            NavigatorButtons.Append.Visible = False
            NavigatorButtons.Delete.Visible = False
            NavigatorButtons.Edit.Visible = False
            NavigatorButtons.Post.Visible = False
            NavigatorButtons.Cancel.Visible = False
            NavigatorButtons.Refresh.Visible = False
            NavigatorButtons.SaveBookmark.Visible = False
            NavigatorButtons.GotoBookmark.Visible = False
            NavigatorButtons.Filter.Visible = False
            FilterBox.Position = fpTop
            DataController.DataSource = dsProd
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <>
            OptionsBehavior.CellHints = True
            OptionsBehavior.IncSearch = True
            OptionsCustomize.ColumnFiltering = False
            OptionsData.CancelOnExit = False
            OptionsData.Deleting = False
            OptionsData.DeletingConfirmation = False
            OptionsData.Editing = False
            OptionsData.Inserting = False
            OptionsView.NavigatorOffset = 10
            OptionsView.CellAutoHeight = True
            OptionsView.CellTextMaxLineCount = 1
            OptionsView.ColumnAutoWidth = True
            OptionsView.GroupByBox = False
            OptionsView.Indicator = True
            Preview.Visible = True
            Styles.IncSearch = DMInv.cxKrasniyText
            Styles.Selection = DMInv.cxJoltiyFon
            Styles.Header = DMInv.cxSiniyText
            object tvProdSDNAME: TcxGridDBColumn
              Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1087#1088#1086#1076#1091#1082#1090#1072
              DataBinding.FieldName = 'SDNAME'
              Options.Editing = False
              Width = 163
            end
            object tvProdBRUTTO: TcxGridDBColumn
              Caption = #1041#1088#1091#1090#1090#1086', '#1075
              DataBinding.FieldName = 'BRUTTO'
              PropertiesClassName = 'TcxCurrencyEditProperties'
              Properties.DisplayFormat = ',0.000'#39#39';-,0.000'#39#39
              Width = 190
            end
            object tvProdNETTO: TcxGridDBColumn
              Caption = #1053#1077#1090#1090#1086', '#1075
              DataBinding.FieldName = 'NETTO'
              PropertiesClassName = 'TcxCurrencyEditProperties'
              Properties.DisplayFormat = ',0.000'#39#39';-,0.000'#39#39
              Width = 161
            end
          end
          object cxGridLevel3: TcxGridLevel
            GridView = tvProd
          end
        end
        object Panel7: TPanel
          Left = 0
          Top = 484
          Width = 397
          Height = 221
          Align = alBottom
          Caption = 'Panel7'
          TabOrder = 2
          DesignSize = (
            397
            221)
          object Label4: TLabel
            Left = 10
            Top = 7
            Width = 162
            Height = 13
            Caption = #1058#1077#1093#1085#1086#1083#1086#1075#1080#1103' '#1087#1088#1080#1075#1086#1090#1086#1074#1083#1077#1085#1080#1103':'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clGray
            Font.Height = -11
            Font.Name = 'Tahoma'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object cxDBMemo5: TcxDBMemo
            Left = 8
            Top = 24
            Anchors = [akLeft, akTop, akRight, akBottom]
            DataBinding.DataField = 'COOKING'
            DataBinding.DataSource = dsTechMap
            Properties.MaxLength = 2048
            Properties.ReadOnly = False
            Properties.ScrollBars = ssVertical
            TabOrder = 0
            Height = 188
            Width = 379
          end
        end
      end
      object tsProdAll: TcxTabSheet
        Caption = #1056#1072#1089#1082#1083#1072#1076#1082#1072' '#1087#1088#1086#1076#1091#1082#1090#1086#1074' '#1087#1086' '#1073#1083#1102#1076#1072#1084
        ImageIndex = 2
        object dbgProdraskl: TcxGrid
          Left = 0
          Top = 0
          Width = 397
          Height = 705
          Align = alClient
          BevelEdges = [beTop, beRight, beBottom]
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          LookAndFeel.Kind = lfStandard
          object tvProdraskl: TcxGridDBTableView
            NavigatorButtons.ConfirmDelete = False
            NavigatorButtons.First.Visible = True
            NavigatorButtons.PriorPage.Visible = True
            NavigatorButtons.Prior.Visible = True
            NavigatorButtons.Next.Visible = True
            NavigatorButtons.NextPage.Visible = True
            NavigatorButtons.Last.Visible = True
            NavigatorButtons.Insert.Visible = False
            NavigatorButtons.Append.Visible = False
            NavigatorButtons.Delete.Visible = False
            NavigatorButtons.Edit.Visible = False
            NavigatorButtons.Post.Visible = False
            NavigatorButtons.Cancel.Visible = False
            NavigatorButtons.Refresh.Visible = False
            NavigatorButtons.SaveBookmark.Visible = False
            NavigatorButtons.GotoBookmark.Visible = False
            NavigatorButtons.Filter.Visible = False
            FilterBox.Position = fpTop
            DataController.DataSource = dsProdAll
            DataController.Summary.DefaultGroupSummaryItems = <
              item
                Format = #1042#1099#1093#1086#1076' ('#1082#1075') =,0.000'
                Kind = skSum
                FieldName = 'NET'
                Column = tvProdrasklBLJUDO
              end>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <
              item
                Links = <>
                SummaryItems = <>
              end>
            OptionsBehavior.CellHints = True
            OptionsBehavior.IncSearch = True
            OptionsCustomize.ColumnFiltering = False
            OptionsCustomize.ColumnGrouping = False
            OptionsData.CancelOnExit = False
            OptionsData.Deleting = False
            OptionsData.DeletingConfirmation = False
            OptionsData.Editing = False
            OptionsData.Inserting = False
            OptionsView.NavigatorOffset = 10
            OptionsView.CellAutoHeight = True
            OptionsView.CellTextMaxLineCount = 1
            OptionsView.ColumnAutoWidth = True
            OptionsView.GroupByBox = False
            Preview.Visible = True
            Styles.IncSearch = DMInv.cxKrasniyText
            Styles.Selection = DMInv.cxJoltiyFon
            Styles.Header = DMInv.cxSiniyText
            object tvProdrasklBLJUDO: TcxGridDBColumn
              Caption = #1041#1083#1102#1076#1086
              DataBinding.FieldName = 'BLJUDO'
              Visible = False
              GroupIndex = 0
              Width = 77
            end
            object tvProdrasklPRODUKT: TcxGridDBColumn
              Caption = #1055#1088#1086#1076#1091#1082#1090
              DataBinding.FieldName = 'PRODUKT'
              Width = 162
            end
            object tvProdrasklBR: TcxGridDBColumn
              Caption = #1041#1088#1091#1090#1090#1086
              DataBinding.FieldName = 'BR'
              Width = 61
            end
            object tvProdrasklNET: TcxGridDBColumn
              Caption = #1053#1077#1090#1090#1086
              DataBinding.FieldName = 'NET'
              Width = 61
            end
          end
          object cxGridLevel4: TcxGridLevel
            GridView = tvProdraskl
          end
        end
      end
      object tsProdPodr: TcxTabSheet
        Caption = #1042#1099#1093#1086#1076' '#1073#1083#1102#1076' '#1087#1086' '#1087#1086#1076#1088'.'
        ImageIndex = 3
        object dbgProdPodr: TcxGrid
          Left = 0
          Top = 0
          Width = 397
          Height = 705
          Align = alClient
          BevelEdges = [beTop, beRight, beBottom]
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          LookAndFeel.Kind = lfStandard
          object tvProdPodr: TcxGridDBTableView
            NavigatorButtons.ConfirmDelete = False
            NavigatorButtons.First.Visible = True
            NavigatorButtons.PriorPage.Visible = True
            NavigatorButtons.Prior.Visible = True
            NavigatorButtons.Next.Visible = True
            NavigatorButtons.NextPage.Visible = True
            NavigatorButtons.Last.Visible = True
            NavigatorButtons.Insert.Visible = False
            NavigatorButtons.Append.Visible = False
            NavigatorButtons.Delete.Visible = False
            NavigatorButtons.Edit.Visible = False
            NavigatorButtons.Post.Visible = False
            NavigatorButtons.Cancel.Visible = False
            NavigatorButtons.Refresh.Visible = False
            NavigatorButtons.SaveBookmark.Visible = False
            NavigatorButtons.GotoBookmark.Visible = False
            NavigatorButtons.Filter.Visible = False
            FilterBox.Position = fpTop
            DataController.DataSource = dsProdPodr
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <
              item
                Links = <>
                SummaryItems = <>
              end>
            OptionsBehavior.CellHints = True
            OptionsBehavior.IncSearch = True
            OptionsCustomize.ColumnFiltering = False
            OptionsCustomize.ColumnGrouping = False
            OptionsData.CancelOnExit = False
            OptionsData.Deleting = False
            OptionsData.DeletingConfirmation = False
            OptionsData.Editing = False
            OptionsData.Inserting = False
            OptionsView.NavigatorOffset = 10
            OptionsView.CellAutoHeight = True
            OptionsView.CellTextMaxLineCount = 1
            OptionsView.ColumnAutoWidth = True
            OptionsView.GroupByBox = False
            Preview.Visible = True
            Styles.IncSearch = DMInv.cxKrasniyText
            Styles.Selection = DMInv.cxJoltiyFon
            Styles.Header = DMInv.cxSiniyText
            object tvProdPodrPRIEM: TcxGridDBColumn
              DataBinding.FieldName = 'PRIEM'
              Visible = False
              GroupIndex = 0
              IsCaptionAssigned = True
            end
            object tvProdPodrTIP: TcxGridDBColumn
              Caption = #1055#1086#1076#1088'.'
              DataBinding.FieldName = 'TIP'
              Visible = False
              GroupIndex = 1
            end
            object tvProdPodrSDNAME1: TcxGridDBColumn
              Caption = #1041#1083#1102#1076#1086
              DataBinding.FieldName = 'SDNAME1'
              Width = 287
            end
            object tvProdPodrVYHOD: TcxGridDBColumn
              Caption = #1042#1099#1093#1086#1076' ('#1082#1075')'
              DataBinding.FieldName = 'VYHOD'
              Width = 70
            end
          end
          object cxGridLevel5: TcxGridLevel
            GridView = tvProdPodr
          end
        end
      end
    end
    object dxBarDockControl1: TdxBarDockControl
      Left = 1
      Top = 1
      Width = 399
      Height = 26
      Align = dalTop
      BarManager = dxBarManager1
    end
  end
  object Panel5: TPanel [4]
    Left = 409
    Top = 72
    Width = 995
    Height = 755
    Align = alClient
    Caption = 'Panel5'
    TabOrder = 8
    object Panel8: TPanel
      Left = 1
      Top = 1
      Width = 993
      Height = 27
      Align = alTop
      TabOrder = 0
      object dxBarDockControl3: TdxBarDockControl
        Left = 1
        Top = 1
        Width = 991
        Height = 25
        Align = dalTop
        BarManager = dxBarManager1
      end
    end
    object cxGrid3: TcxGrid
      Left = 1
      Top = 28
      Width = 993
      Height = 637
      Align = alClient
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      LookAndFeel.Kind = lfStandard
      object tvmenu: TcxGridDBBandedTableView
        NavigatorButtons.ConfirmDelete = False
        OnCellClick = tvmenuCellClick
        DataController.DataSource = dsMenu
        DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoGroupsAlwaysExpanded]
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsCustomize.ColumnFiltering = False
        OptionsCustomize.ColumnMoving = False
        OptionsCustomize.ColumnSorting = False
        OptionsCustomize.BandMoving = False
        OptionsData.Editing = False
        OptionsView.ColumnAutoWidth = True
        OptionsView.GroupByBox = False
        Styles.IncSearch = DMInv.cxKrasniyText
        Styles.Selection = DMInv.cxJoltiyFon
        Styles.Header = DMInv.cxSiniyText
        Styles.BandHeader = DMInv.cxSiniyText
        Bands = <
          item
            Width = 77
          end
          item
            Caption = #1044#1077#1090#1089#1082#1080#1081' '#1089#1072#1076
            Width = 157
          end
          item
            Caption = #1053#1072#1095#1072#1083#1100#1085#1072#1103' '#1096#1082#1086#1083#1072
            Width = 193
          end
          item
            Caption = #1057#1088#1077#1076#1085#1103#1103' '#1096#1082#1086#1083#1072
            Width = 260
          end
          item
            Caption = #1057#1086#1090#1088#1091#1076#1085#1080#1082#1080
            Width = 248
          end>
        object tvmenuGR: TcxGridDBBandedColumn
          Caption = #1055#1088#1080#1077#1084' '#1087#1080#1097#1080
          DataBinding.FieldName = 'GR'
          Visible = False
          GroupIndex = 1
          Position.BandIndex = 0
          Position.ColIndex = 3
          Position.RowIndex = 0
        end
        object cxGridDBBandedTableViewCPDATE: TcxGridDBBandedColumn
          Caption = #1044#1072#1090#1072
          DataBinding.FieldName = 'PDATE'
          Position.BandIndex = 0
          Position.ColIndex = 1
          Position.RowIndex = 0
        end
        object tvmenuPDATE: TcxGridDBBandedColumn
          Caption = #1044#1072#1090#1072
          DataBinding.FieldName = 'PDATE'
          Visible = False
          GroupIndex = 0
          Position.BandIndex = 0
          Position.ColIndex = 0
          Position.RowIndex = 0
        end
        object tvmenuTYPEPORTION: TcxGridDBBandedColumn
          DataBinding.FieldName = 'TYPEPORTION'
          Visible = False
          Position.BandIndex = 0
          Position.ColIndex = 4
          Position.RowIndex = 0
        end
        object tvmenuNUM: TcxGridDBBandedColumn
          Caption = #8470
          DataBinding.FieldName = 'NUM'
          SortIndex = 0
          SortOrder = soAscending
          Position.BandIndex = 0
          Position.ColIndex = 2
          Position.RowIndex = 0
        end
        object tvmenuANURSERY1: TcxGridDBBandedColumn
          Caption = #1044#1077#1090#1080' 1-3 '#1075#1086#1076#1072
          DataBinding.FieldName = 'TNURSERY1'
          Width = 31
          Position.BandIndex = 1
          Position.ColIndex = 0
          Position.RowIndex = 0
        end
        object tvmenuANURSERY2: TcxGridDBBandedColumn
          Caption = #1044#1077#1090#1080' 3-6 '#1083#1077#1090
          DataBinding.FieldName = 'TNURSERY2'
          Width = 33
          Position.BandIndex = 1
          Position.ColIndex = 1
          Position.RowIndex = 0
        end
        object tvmenuANURSERYSTAFF: TcxGridDBBandedColumn
          Caption = #1057#1086#1090#1088#1091#1076#1085#1080#1082#1080
          DataBinding.FieldName = 'TNURSERYSTAFF'
          Width = 40
          Position.BandIndex = 1
          Position.ColIndex = 2
          Position.RowIndex = 0
        end
        object tvmenuSDNAME1: TcxGridDBBandedColumn
          Caption = #1041#1083#1102#1076#1072
          DataBinding.FieldName = 'SDNAME1'
          Width = 53
          Position.BandIndex = 1
          Position.ColIndex = 3
          Position.RowIndex = 0
        end
        object tvmenuAPRIMARY: TcxGridDBBandedColumn
          Caption = #1044#1077#1090#1080
          DataBinding.FieldName = 'TPRIMARY'
          Position.BandIndex = 2
          Position.ColIndex = 0
          Position.RowIndex = 0
        end
        object tvmenuAPRIMARYSTAFF: TcxGridDBBandedColumn
          Caption = #1057#1086#1090#1088#1091#1076#1085#1080#1082#1080
          DataBinding.FieldName = 'TPRIMARYSTAFF'
          Position.BandIndex = 2
          Position.ColIndex = 1
          Position.RowIndex = 0
        end
        object tvmenuSDNAME2: TcxGridDBBandedColumn
          Caption = #1041#1083#1102#1076#1072
          DataBinding.FieldName = 'SDNAME2'
          Position.BandIndex = 2
          Position.ColIndex = 2
          Position.RowIndex = 0
        end
        object tvmenuAHIGH: TcxGridDBBandedColumn
          Caption = #1044#1077#1090#1080
          DataBinding.FieldName = 'THIGH'
          Position.BandIndex = 3
          Position.ColIndex = 0
          Position.RowIndex = 0
        end
        object tvmenuAHIGHSTAFF: TcxGridDBBandedColumn
          Caption = #1057#1086#1090#1088#1091#1076#1085#1080#1082#1080
          DataBinding.FieldName = 'THIGHSTAFF'
          Position.BandIndex = 3
          Position.ColIndex = 1
          Position.RowIndex = 0
        end
        object tvmenuSDNAME3: TcxGridDBBandedColumn
          Caption = #1041#1083#1102#1076#1072
          DataBinding.FieldName = 'SDNAME3'
          Position.BandIndex = 3
          Position.ColIndex = 2
          Position.RowIndex = 0
        end
        object tvmenuASTAFF: TcxGridDBBandedColumn
          Caption = #1057#1086#1090#1088#1091#1076#1085#1080#1082#1080
          DataBinding.FieldName = 'TSTAFF'
          Width = 72
          Position.BandIndex = 4
          Position.ColIndex = 0
          Position.RowIndex = 0
        end
        object tvmenuSDNAME4: TcxGridDBBandedColumn
          Caption = #1041#1083#1102#1076#1072
          DataBinding.FieldName = 'SDNAME4'
          Width = 101
          Position.BandIndex = 4
          Position.ColIndex = 1
          Position.RowIndex = 0
        end
      end
      object cxGridLevel2: TcxGridLevel
        GridView = tvmenu
      end
    end
    object cxMemo1: TcxMemo
      Left = 1
      Top = 665
      Align = alBottom
      Lines.Strings = (
        'cxMemo1')
      Properties.ScrollBars = ssVertical
      TabOrder = 2
      Visible = False
      Height = 89
      Width = 993
    end
  end
  object cxSplitter1: TcxSplitter [5]
    Left = 401
    Top = 72
    Width = 8
    Height = 755
    HotZoneClassName = 'TcxXPTaskBarStyle'
    Control = Panel6
  end
  object dxBarManager1: TdxBarManager
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Segoe UI'
    Font.Style = []
    Categories.Strings = (
      'Default')
    Categories.ItemsVisibles = (
      2)
    Categories.Visibles = (
      True)
    ImageOptions.Images = DMInv.cxSmallImages
    PopupMenuLinks = <>
    UseSystemFont = True
    Left = 338
    Top = 7
    DockControlHeights = (
      0
      0
      0
      0)
    object dxBarManager1Bar2: TdxBar
      Caption = 'Custom 2'
      CaptionButtons = <>
      DockControl = dxBarDockControl4
      DockedDockControl = dxBarDockControl4
      DockedLeft = 0
      DockedTop = 0
      FloatLeft = 224
      FloatTop = 325
      FloatClientWidth = 0
      FloatClientHeight = 0
      ItemLinks = <
        item
          UserDefine = [udWidth]
          UserWidth = 106
          Visible = True
          ItemName = 'eDateIn'
        end
        item
          UserDefine = [udWidth]
          UserWidth = 113
          Visible = True
          ItemName = 'eDateOut'
        end
        item
          Visible = True
          ItemName = 'beDateClone'
        end
        item
          Visible = True
          ItemName = 'bbsearch'
        end>
      NotDocking = [dsNone, dsLeft, dsTop, dsRight, dsBottom]
      OneOnRow = True
      Row = 0
      ShowMark = False
      UseOwnFont = False
      UseRestSpace = True
      Visible = True
      WholeRow = False
    end
    object dxBarManager1Bar3: TdxBar
      Caption = 'Custom 3'
      CaptionButtons = <>
      DockControl = dxBarDockControl3
      DockedDockControl = dxBarDockControl3
      DockedLeft = 0
      DockedTop = 0
      FloatLeft = 231
      FloatTop = 347
      FloatClientWidth = 0
      FloatClientHeight = 0
      ItemLinks = <
        item
          UserDefine = [udWidth]
          UserWidth = 37
          Visible = True
          ItemName = 'cxBarEditItem1'
        end
        item
          UserDefine = [udWidth]
          UserWidth = 36
          Visible = True
          ItemName = 'cxBarEditItem2'
        end
        item
          UserDefine = [udWidth]
          UserWidth = 45
          Visible = True
          ItemName = 'cxBarEditItem3'
        end
        item
          UserDefine = [udWidth]
          UserWidth = 44
          Visible = True
          ItemName = 'cxBarEditItem4'
        end
        item
          UserDefine = [udWidth]
          UserWidth = 46
          Visible = True
          ItemName = 'cxBarEditItem5'
        end
        item
          UserDefine = [udWidth]
          UserWidth = 47
          Visible = True
          ItemName = 'cxBarEditItem6'
        end
        item
          UserDefine = [udWidth]
          UserWidth = 45
          Visible = True
          ItemName = 'cxBarEditItem7'
        end>
      NotDocking = [dsNone, dsLeft, dsTop, dsRight, dsBottom]
      OneOnRow = True
      Row = 0
      ShowMark = False
      UseOwnFont = False
      UseRestSpace = True
      Visible = True
      WholeRow = False
    end
    object dxBarManager1Bar1: TdxBar
      AllowClose = False
      AllowCustomizing = False
      AllowQuickCustomizing = False
      AllowReset = False
      Caption = 'Custom 1'
      CaptionButtons = <>
      DockControl = dxBarDockControl1
      DockedDockControl = dxBarDockControl1
      DockedLeft = 0
      DockedTop = 0
      FloatLeft = 480
      FloatTop = 172
      FloatClientWidth = 0
      FloatClientHeight = 0
      ItemLinks = <
        item
          Visible = True
          ItemName = 'bbToExcel'
        end
        item
          Visible = True
          ItemName = 'bbExpand'
        end
        item
          Visible = True
          ItemName = 'bbCollapse'
        end>
      NotDocking = [dsNone, dsLeft, dsTop, dsRight, dsBottom]
      OneOnRow = True
      Row = 0
      UseOwnFont = False
      UseRestSpace = True
      Visible = True
      WholeRow = False
    end
    object dxBarButton1: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 51
    end
    object dxBarButton2: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 54
    end
    object dxBarButton3: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 46
    end
    object dxBarButton4: TdxBarButton
      Caption = 'New Button'
      Category = 0
      Hint = #1048#1079#1084#1077#1085#1080#1090#1100' '#1096#1072#1073#1083#1086#1085
      Visible = ivNever
      ImageIndex = 37
    end
    object dxBarButton5: TdxBarButton
      Caption = 'New Button'
      Category = 0
      Visible = ivAlways
      ImageIndex = 51
    end
    object dxBarButton6: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 54
    end
    object dxBarButton7: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 46
    end
    object dxBarButton8: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 51
    end
    object dxBarButton9: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 54
    end
    object dxBarButton10: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 46
    end
    object dxBarButton11: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 51
    end
    object dxBarButton12: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 54
    end
    object dxBarButton13: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 46
    end
    object dxBarButton14: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 51
    end
    object dxBarButton15: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 54
    end
    object dxBarButton16: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 46
    end
    object dxBarButton17: TdxBarButton
      Align = iaRight
      Caption = 'New Button'
      Category = 0
      Visible = ivAlways
      ImageIndex = 17
    end
    object dxBarButton18: TdxBarButton
      Align = iaRight
      Category = 0
      Visible = ivAlways
      ImageIndex = 17
    end
    object dxBarButton19: TdxBarButton
      Align = iaRight
      Category = 0
      Visible = ivAlways
      ImageIndex = 17
    end
    object dxBarButton20: TdxBarButton
      Align = iaRight
      Category = 0
      Visible = ivAlways
      ImageIndex = 17
    end
    object dxBarButton21: TdxBarButton
      Align = iaRight
      Category = 0
      Visible = ivAlways
      ImageIndex = 17
    end
    object dxBarButton22: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 51
    end
    object dxBarButton23: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 54
    end
    object dxBarButton24: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 46
    end
    object dxBarButton25: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 41
    end
    object dxBarButton26: TdxBarButton
      Align = iaRight
      Caption = 'New Button'
      Category = 0
      Hint = 'New Button'
      Visible = ivAlways
      ImageIndex = 17
    end
    object dxBarButton27: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 51
    end
    object dxBarButton28: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 54
    end
    object dxBarButton29: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 46
    end
    object dxBarButton30: TdxBarButton
      Align = iaRight
      Category = 0
      Visible = ivAlways
      ImageIndex = 17
    end
    object dxBarButton31: TdxBarButton
      Align = iaRight
      Category = 0
      Visible = ivAlways
      ImageIndex = 17
    end
    object dxBarSubItem1: TdxBarSubItem
      Caption = 'New SubItem'
      Category = 0
      Visible = ivAlways
      ItemLinks = <>
    end
    object dxBarButton32: TdxBarButton
      Category = 0
      Visible = ivAlways
      ImageIndex = 51
    end
    object dxBarButton33: TdxBarButton
      Category = 0
      Visible = ivNever
      ImageIndex = 41
    end
    object dxBarButton34: TdxBarButton
      Category = 0
      Visible = ivNever
      ImageIndex = 54
    end
    object dxBarButton35: TdxBarButton
      Category = 0
      Visible = ivNever
      ImageIndex = 46
    end
    object dxBarEdit1: TdxBarEdit
      Caption = 'New Item'
      Category = 0
      Hint = 'New Item'
      Visible = ivAlways
      Width = 100
    end
    object beDate: TcxBarEditItem
      Caption = #1053#1072' '#1076#1072#1090#1091
      Category = 0
      Hint = #1053#1072' '#1076#1072#1090#1091
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxDateEditProperties'
    end
    object dxBarButton36: TdxBarButton
      Caption = 'New Button'
      Category = 0
      Hint = 'New Button'
      Visible = ivAlways
      ImageIndex = 51
    end
    object dxBarButton37: TdxBarButton
      Caption = 'New Button'
      Category = 0
      Hint = 'New Button'
      Visible = ivAlways
      ImageIndex = 46
    end
    object dxBarButton38: TdxBarButton
      Caption = 'New Button'
      Category = 0
      Hint = 'New Button'
      Visible = ivAlways
    end
    object dxBarButton39: TdxBarButton
      Caption = 'New Button'
      Category = 0
      Hint = 'New Button'
      Visible = ivAlways
      ImageIndex = 10
    end
    object dxBarButton40: TdxBarButton
      Caption = 'New Button'
      Category = 0
      Hint = 'New Button'
      Visible = ivAlways
      Glyph.Data = {
        56020000424D560200000000000076000000280000001E0000001E0000000100
        040000000000E001000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000
        00000000000000000002077777777777777777777777777770020F7777777777
        777777777777777770D40F8888888888888888888888888770B90F8888888888
        888888888888888770000F8888888888888888888888888770000F8888888888
        800000000000088770000F888888888880FF8FFF8FFF088770000F8888888888
        80FF8FFF8FFF088770000F8888888888807777777777088770000F8880000088
        80FF8FFF8FFF088770000F888066608880FF8FFF8FFF088770000F8880666088
        807777777777088770000F888066608880FF8FFF8FFF088770000F8000666000
        80FF8FFF8FFF088770000F8806666608807777777777088770000F8880666088
        80FF8FFF8FFF088770000F888806088880FF8FFF8FFF088770000F8888808888
        807777777777088770000F888888888880FF8FFF8FFF088770000F8888888888
        80FF8FFF8FFF088770000F8888888888807777777777088770000F8888888888
        80FF8FFF8FFF088770000F888888888880FF8FFF8FFF088770000F8888888888
        800000000000088770000F8888888888888888888888888770000F8888888888
        888888888888888770000F8888888888888888888888888770000FFFFFFFFFFF
        FFFFFFFFFFFFFFFF7000000000000000000000000000000000C5}
    end
    object dxBarButton41: TdxBarButton
      Caption = 'New Button'
      Category = 0
      Hint = 'New Button'
      Visible = ivAlways
      Glyph.Data = {
        56020000424D560200000000000076000000280000001E0000001E0000000100
        040000000000E001000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000
        00000000000000000000077777777777777777777777777770000F7777777777
        777777777777777770560F8888888888888888888888888770DD0F8888888888
        888888888888888770260F8888888888888888888888888770000F8888888888
        800000000000088770270F888888888880FF8FFF8FFF088770FB0F8888888888
        80FF8FFF8FFF088770F30F8888888888807777777777088770F30F8888888888
        80FF8FFF8FFF088770F30F888888888880FF8FFF8FFF088770F30F8888808888
        807777777777088770F70F888806088880FF8FFF8FFF088770B70F8880666088
        80FF8FFF8FFF088770370F8806666608807777777777088770370F8000666000
        80FF8FFF8FFF088770370F888066608880FF8FFF8FFF088770330F8880666088
        807777777777088770330F888066608880FF8FFF8FFF088770000F8880000088
        80FF8FFF8FFF088770000F8888888888807777777777088770000F8888888888
        80FF8FFF8FFF088770440F888888888880FF8FFF8FFF088770330F8888888888
        800000000000088770BB0F8888888888888888888888888770880F8888888888
        888888888888888770000F8888888888888888888888888770000FFFFFFFFFFF
        FFFFFFFFFFFFFFFF700000000000000000000000000000000000}
    end
    object dxBarButton42: TdxBarButton
      Caption = 'New Button'
      Category = 0
      Hint = 'New Button'
      Visible = ivAlways
    end
    object dxBarSubItem2: TdxBarSubItem
      Caption = 'New SubItem'
      Category = 0
      Visible = ivAlways
      ItemLinks = <>
    end
    object beDateAll: TcxBarEditItem
      Caption = #1053#1072' '#1076#1072#1090#1091
      Category = 0
      Hint = #1053#1072' '#1076#1072#1090#1091
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxDateEditProperties'
    end
    object dxBarLookupCombo1: TdxBarLookupCombo
      Caption = #1044#1077#1085#1100' '#1085#1077#1076#1077#1083#1080
      Category = 0
      Hint = #1044#1077#1085#1100' '#1085#1077#1076#1077#1083#1080
      Visible = ivAlways
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDD000000000000000D0FFFF0FFFFFFFF0D0F77F0F777777F0D0CCCC0CCCCCC
        CC0D0C77C0C777777C0D0CCCC0CCCCCCCC0D0F77F0F777777F0D0FFFF0FFFFFF
        FF0D0F77F0F777777F0D0FFFF0FFFFFFFF0D000000000000000D0FFFCCCCFFF0
        DDDD0F777777FFF0DDDD0FFFCCCCFFF0DDDD000000000000DDDD}
      ShowCaption = True
      Width = 100
      RowCount = 7
    end
    object eDateIn: TcxBarEditItem
      Caption = #1056#1072#1089#1095#1077#1090' '#1079#1072' '#1087#1077#1088#1080#1086#1076' '#1089':'
      Category = 0
      Hint = #1056#1072#1089#1095#1077#1090' '#1079#1072' '#1087#1077#1088#1080#1086#1076' '#1089':'
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxDateEditProperties'
      Properties.OnCloseUp = eDateInPropertiesCloseUp
    end
    object eDateOut: TcxBarEditItem
      Caption = ' '#1087#1086':'
      Category = 0
      Hint = ' '#1087#1086':'
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxDateEditProperties'
      Properties.OnCloseUp = eDateOutPropertiesCloseUp
    end
    object cxBarEditItem2: TcxBarEditItem
      Caption = #1047#1072#1074#1090#1088#1072#1082' '#8470'1'
      Category = 0
      Hint = #1047#1072#1074#1090#1088#1072#1082' '#8470'1'
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxCheckBoxProperties'
      Properties.GlyphCount = 7
      Properties.ImmediatePost = True
      Properties.NullStyle = nssUnchecked
      Properties.ValueChecked = 1
      Properties.ValueUnchecked = 0
      Properties.OnEditValueChanged = cxBarEditItem2PropertiesEditValueChanged
      InternalEditValue = 1
    end
    object cxBarEditItem3: TcxBarEditItem
      Caption = #1047#1072#1074#1090#1088#1072#1082' '#8470'2'
      Category = 0
      Hint = #1047#1072#1074#1090#1088#1072#1082' '#8470'2'
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxCheckBoxProperties'
      Properties.GlyphCount = 8
      Properties.ImmediatePost = True
      Properties.NullStyle = nssUnchecked
      Properties.ValueChecked = 1
      Properties.ValueUnchecked = 0
      Properties.OnEditValueChanged = cxBarEditItem3PropertiesEditValueChanged
      InternalEditValue = '1'
    end
    object cxBarEditItem4: TcxBarEditItem
      Caption = #1054#1073#1077#1076
      Category = 0
      Hint = #1054#1073#1077#1076
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxCheckBoxProperties'
      Properties.ImmediatePost = True
      Properties.NullStyle = nssUnchecked
      Properties.ValueChecked = 1
      Properties.ValueUnchecked = 0
      Properties.OnEditValueChanged = cxBarEditItem4PropertiesEditValueChanged
      InternalEditValue = '1'
    end
    object cxBarEditItem5: TcxBarEditItem
      Caption = #1055#1086#1083#1076#1085#1080#1082
      Category = 0
      Hint = #1055#1086#1083#1076#1085#1080#1082
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxCheckBoxProperties'
      Properties.ImmediatePost = True
      Properties.NullStyle = nssUnchecked
      Properties.ValueChecked = 1
      Properties.ValueUnchecked = 0
      Properties.OnEditValueChanged = cxBarEditItem5PropertiesEditValueChanged
      InternalEditValue = '1'
    end
    object cxBarEditItem6: TcxBarEditItem
      Caption = #1059#1078#1080#1085' '#8470'1'
      Category = 0
      Hint = #1059#1078#1080#1085' '#8470'1'
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxCheckBoxProperties'
      Properties.ImmediatePost = True
      Properties.NullStyle = nssUnchecked
      Properties.ValueChecked = 1
      Properties.ValueUnchecked = 0
      Properties.OnEditValueChanged = cxBarEditItem6PropertiesEditValueChanged
      InternalEditValue = '1'
    end
    object cxBarEditItem7: TcxBarEditItem
      Caption = #1059#1078#1080#1085' '#8470'2'
      Category = 0
      Hint = #1059#1078#1080#1085' '#8470'2'
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxCheckBoxProperties'
      Properties.GlyphCount = 13
      Properties.ImmediatePost = True
      Properties.NullStyle = nssUnchecked
      Properties.ValueChecked = 1
      Properties.ValueUnchecked = 0
      Properties.OnEditValueChanged = cxBarEditItem7PropertiesEditValueChanged
      InternalEditValue = '1'
    end
    object eDateContIn: TcxBarEditItem
      Caption = #1047#1072' '#1087#1077#1088#1080#1086#1076' '#1089':'
      Category = 0
      Hint = #1047#1072' '#1087#1077#1088#1080#1086#1076' '#1089':'
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxDateEditProperties'
      Properties.OnCloseUp = eDateContInPropertiesCloseUp
    end
    object eDateContOut: TcxBarEditItem
      Caption = #1087#1086':'
      Category = 0
      Hint = #1087#1086':'
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxDateEditProperties'
      Properties.OnCloseUp = eDateContOutPropertiesCloseUp
    end
    object bbsearch: TdxBarButton
      Caption = #1056#1072#1089#1089#1095#1080#1090#1072#1090#1100
      Category = 0
      Enabled = False
      Hint = #1056#1072#1089#1089#1095#1080#1090#1072#1090#1100
      Visible = ivAlways
      ImageIndex = 36
      PaintStyle = psCaptionGlyph
      OnClick = bbsearchClick
    end
    object beDateClone: TcxBarEditItem
      Caption = #1087#1086' '#1073#1072#1079#1086#1074#1086#1081' '#1076#1072#1090#1077':'
      Category = 0
      Hint = #1087#1086' '#1073#1072#1079#1086#1074#1086#1081' '#1076#1072#1090#1077':'
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxDateEditProperties'
      Properties.OnCloseUp = eDateOutPropertiesCloseUp
    end
    object cxBarEditItem1: TcxBarEditItem
      Caption = #1047#1072#1074#1090#1088#1072#1082' '#8470'0'
      Category = 0
      Hint = #1047#1072#1074#1090#1088#1072#1082' '#8470'0'
      Visible = ivAlways
      ShowCaption = True
      Width = 100
      PropertiesClassName = 'TcxCheckBoxProperties'
      Properties.NullStyle = nssUnchecked
      Properties.ValueChecked = 1
      Properties.ValueUnchecked = 0
      Properties.OnEditValueChanged = cxBarEditItem2PropertiesEditValueChanged
      InternalEditValue = '1'
    end
    object bbToExcel: TdxBarButton
      Caption = 'New Button'
      Category = 0
      Visible = ivAlways
      ImageIndex = 48
      OnClick = bbToExcelClick
    end
    object bbExpand: TdxBarButton
      Caption = #1056#1072#1079#1074#1077#1088#1085#1091#1090#1100
      Category = 0
      Hint = #1056#1072#1079#1074#1077#1088#1085#1091#1090#1100
      Visible = ivNever
      ImageIndex = 64
      OnClick = bbExpandClick
    end
    object bbCollapse: TdxBarButton
      Caption = #1057#1074#1077#1088#1085#1091#1090#1100
      Category = 0
      Hint = #1057#1074#1077#1088#1085#1091#1090#1100
      Visible = ivNever
      ImageIndex = 65
      OnClick = bbCollapseClick
    end
  end
  object dsMenu: TDataSource
    DataSet = qMenu
    Left = 520
    Top = 192
  end
  object qMenu: TIBQuery
    Database = DMInv.DBRead
    Transaction = DMInv.IBTransaction1
    CachedUpdates = True
    DataSource = dlgDS
    SQL.Strings = (
      'select FP.PDATE, FP.TYPEPORTION, SP.NUM, W.WWEEK,'
      
        '       (extract(weekday from FP.PDATE)) as WWEEKDEY, FP.TNURSERY' +
        '1,'
      '       FP.TNURSERY2, FP.TNURSERYSTAFF, '
      '       SM1.MCSDID as  MCSDID1,'
      '       SD1.SDNAME as SDNAME1, '
      '       FP.TPRIMARY, FP.TPRIMARYSTAFF,'
      '       SM2.MCSDID as  MCSDID2, '
      '       SD2.SDNAME as SDNAME2, '
      '       FP.THIGH, FP.THIGHSTAFF,'
      '       SM3.MCSDID as  MCSDID3, '
      '       SD3.SDNAME as SDNAME3, '
      '       FP.TSTAFF, '
      '       SM4.MCSDID  as  MCSDID4,'
      '       SD4.SDNAME as SDNAME4,'
      '       case'
      'when FP.TYPEPORTION = 0 then '#39#1047#1072#1074#1090#1088#1072#1082' '#8470'0'#39
      '         when FP.TYPEPORTION = 1 then '#39#1047#1072#1074#1090#1088#1072#1082' '#8470'1'#39
      '         when FP.TYPEPORTION = 2 then '#39#1047#1072#1074#1090#1088#1072#1082' '#8470'2'#39
      '         when FP.TYPEPORTION = 3 then '#39#1054#1073#1077#1076#39
      '         when FP.TYPEPORTION = 4 then '#39#1055#1086#1083#1076#1085#1080#1082#39
      '         when FP.TYPEPORTION = 5 then '#39#1059#1078#1080#1085' '#8470'1'#39
      '         when FP.TYPEPORTION = 6 then '#39#1059#1078#1080#1085' '#8470'2'#39
      '       end as GR'
      'from F_PORTION FP'
      
        'inner join F_WEEK W on FP.PDATE between W.WDATEBEGIN and W.WDATE' +
        'END'
      
        'left join F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP on SP.OMCTY' +
        'PE = FP.TYPEPORTION and SP.ODATE = FP.PDATE'
      ''
      
        'left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, SP.NUM, W.WW' +
        'EEK, (extract(weekday from FP.PDATE))) SM1 on SM1.ODATE = FP.PDA' +
        'TE and SM1.OMCTYPE = FP.TYPEPORTION and SM1.OMTYPE = 1 and SM1.O' +
        'NUM = SP.NUM'
      
        'left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 2, SP.NUM, W.WW' +
        'EEK, (extract(weekday from FP.PDATE))) SM2 on SM2.ODATE = FP.PDA' +
        'TE and SM2.OMCTYPE = FP.TYPEPORTION and SM2.OMTYPE = 2 and SM2.O' +
        'NUM = SP.NUM'
      
        'left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 3, SP.NUM, W.WW' +
        'EEK, (extract(weekday from FP.PDATE))) SM3 on SM3.ODATE = FP.PDA' +
        'TE and SM3.OMCTYPE = FP.TYPEPORTION and SM3.OMTYPE = 3 and SM3.O' +
        'NUM = SP.NUM'
      
        'left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 4, SP.NUM, W.WW' +
        'EEK, (extract(weekday from FP.PDATE))) SM4 on SM4.ODATE = FP.PDA' +
        'TE and SM4.OMCTYPE = FP.TYPEPORTION and SM4.OMTYPE = 4 and SM4.O' +
        'NUM = SP.NUM'
      ''
      'left join SYS_DIC SD1 on SD1.SDID = SM1.MCSDID'
      'left join SYS_DIC SD2 on SD2.SDID = SM2.MCSDID'
      'left join SYS_DIC SD3 on SD3.SDID = SM3.MCSDID'
      'left join SYS_DIC SD4 on SD4.SDID = SM4.MCSDID'
      ''
      
        'where ((SM1.MCSDID is not null) or (SM2.MCSDID is not null) or (' +
        'SM3.MCSDID is not null) or (SM4.MCSDID is not null)) and'
      '      (FP.PDATE between :DATEIN and :DATEOUT)')
    GeneratorField.Field = 'SDID'
    Left = 552
    Top = 192
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end>
    object qMenuPDATE: TDateField
      FieldName = 'PDATE'
      Origin = '"F_PORTION"."PDATE"'
    end
    object qMenuTYPEPORTION: TIntegerField
      FieldName = 'TYPEPORTION'
      Origin = '"F_PORTION"."TYPEPORTION"'
    end
    object qMenuNUM: TIntegerField
      FieldName = 'NUM'
      Origin = '"F_SELECTCOUNT"."NUM"'
    end
    object qMenuWWEEK: TIntegerField
      FieldName = 'WWEEK'
      Origin = '"F_WEEK"."WWEEK"'
    end
    object qMenuWWEEKDEY: TSmallintField
      FieldName = 'WWEEKDEY'
      ProviderFlags = []
    end
    object qMenuTNURSERY1: TIntegerField
      FieldName = 'TNURSERY1'
      Origin = '"F_PORTION"."TNURSERY1"'
    end
    object qMenuTNURSERY2: TIntegerField
      FieldName = 'TNURSERY2'
      Origin = '"F_PORTION"."TNURSERY2"'
    end
    object qMenuTNURSERYSTAFF: TIntegerField
      FieldName = 'TNURSERYSTAFF'
      Origin = '"F_PORTION"."TNURSERYSTAFF"'
    end
    object qMenuMCSDID1: TIntegerField
      FieldName = 'MCSDID1'
      Origin = '"F_SELECTMENU"."MCSDID"'
    end
    object qMenuSDNAME1: TIBStringField
      FieldName = 'SDNAME1'
      Origin = '"SYS_DIC"."SDNAME"'
      Size = 255
    end
    object qMenuTPRIMARY: TIntegerField
      FieldName = 'TPRIMARY'
      Origin = '"F_PORTION"."TPRIMARY"'
    end
    object qMenuTPRIMARYSTAFF: TIntegerField
      FieldName = 'TPRIMARYSTAFF'
      Origin = '"F_PORTION"."TPRIMARYSTAFF"'
    end
    object qMenuMCSDID2: TIntegerField
      FieldName = 'MCSDID2'
      Origin = '"F_SELECTMENU"."MCSDID"'
    end
    object qMenuSDNAME2: TIBStringField
      FieldName = 'SDNAME2'
      Origin = '"SYS_DIC"."SDNAME"'
      Size = 255
    end
    object qMenuTHIGH: TIntegerField
      FieldName = 'THIGH'
      Origin = '"F_PORTION"."THIGH"'
    end
    object qMenuTHIGHSTAFF: TIntegerField
      FieldName = 'THIGHSTAFF'
      Origin = '"F_PORTION"."THIGHSTAFF"'
    end
    object qMenuMCSDID3: TIntegerField
      FieldName = 'MCSDID3'
      Origin = '"F_SELECTMENU"."MCSDID"'
    end
    object qMenuSDNAME3: TIBStringField
      FieldName = 'SDNAME3'
      Origin = '"SYS_DIC"."SDNAME"'
      Size = 255
    end
    object qMenuTSTAFF: TIntegerField
      FieldName = 'TSTAFF'
      Origin = '"F_PORTION"."TSTAFF"'
    end
    object qMenuMCSDID4: TIntegerField
      FieldName = 'MCSDID4'
      Origin = '"F_SELECTMENU"."MCSDID"'
    end
    object qMenuSDNAME4: TIBStringField
      FieldName = 'SDNAME4'
      Origin = '"SYS_DIC"."SDNAME"'
      Size = 255
    end
    object qMenuGR: TIBStringField
      FieldName = 'GR'
      ProviderFlags = []
      FixedChar = True
      Size = 10
    end
  end
  object dsSumCont: TDataSource
    DataSet = qSumCont
    Left = 88
    Top = 304
  end
  object qSumCont: TIBQuery
    Database = DMInv.DBRead
    Transaction = DMInv.IBTransaction1
    CachedUpdates = True
    DataSource = dlgDS
    SQL.Strings = (
      'select FULLDS.SDNAME, (sum(FULLDS.SUMBRUTTO)/1000) as SBRUTTO,'
      '       sum(FULLDS.SUMNETTO)/1000 as SNETTO'
      'from ('
      ''
      '-- '#1076#1077#1090#1080' 1-3'
      'select 1 as NUMM, DDS1.SDNAME,'
      
        '       sum(cast(DDS1.FGROUP1 as D_FLOAT) * (cast(DDS1.DSTNURSERY' +
        '1 as D_FLOAT)) * (cast(DDS1.BRUTTO as D_FLOAT))) as SUMBRUTTO,'
      
        '       sum(cast(DDS1.FGROUP1 as D_FLOAT) * (cast(DDS1.DSTNURSERY' +
        '1 as D_FLOAT)) * (cast(DDS1.NETTO as D_FLOAT))) as SUMNETTO'
      'from (select DS1.*, TP.TPSDID, SD2.SDNAME, TP.BRUTTO, TP.NETTO,'
      
        '             FF.FGROUP1, DS1.TNURSERY1 as DSTNURSERY1, TM.TMCATE' +
        'GORY'
      
        '      from (select distinct 1 as NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM,'
      '                            W.WWEEK,'
      ''
      
        '                            (extract(weekday from FP.PDATE)) as ' +
        'WWEEKDEY,'
      '                            FP.TNURSERY1, SM1.MCSDID,'
      '                            SD1.SDNAME as SDNAME1'
      '            from F_PORTION FP'
      
        '            inner join F_WEEK W on FP.PDATE between W.WDATEBEGIN' +
        ' and W.WDATEEND'
      
        '            left join F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' on SP.OMCTYPE = FP.TYPEPORTION and SP.ODATE = FP.PDATE'
      
        '            left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (extract(weekday from FP.PDATE))) SM1 on SM1.OD' +
        'ATE = FP.PDATE and SM1.OMCTYPE = FP.TYPEPORTION and SM1.OMTYPE =' +
        ' 1 and SM1.ONUM = SP.NUM'
      '            left join SYS_DIC SD1 on SD1.SDID = SM1.MCSDID'
      ''
      '            where (SM1.MCSDID is not null) and'
      
        '                  (FP.PDATE between :DATEIN and :DATEOUT) AND fp' +
        '.USERID = CURRENT_USER) DS1'
      ''
      '      left join F_TECHPROD TP on TP.TMID = DS1.MCSDID'
      '      left join SYS_DIC SD2 on SD2.SDID = TP.TPSDID'
      '      left join F_TECHMAP TM on TM.TMSDID = DS1.MCSDID'
      
        '      left join F_FACTOR FF on FF.TYPEFACTOR = TM.TMCATEGORY and' +
        ' DS1.PDATE between FF.DATEBEGIN and FF.DATEEND'
      '      where FF.FISDELETE is null and'
      '            DS1.TNURSERY1 is not null) DDS1'
      'group by 1, 2'
      ''
      '-- '#1076#1077#1090#1080' 3-5'
      'union'
      'select 2 as NUMM, DDS2.SDNAME,'
      
        '       sum(cast(DDS2.FGROUP2 as D_FLOAT) * (cast(DDS2.DSTNURSERY' +
        '2 as D_FLOAT)) * (cast(DDS2.BRUTTO as D_FLOAT))) as SUMBRUTTO,'
      
        '       sum(cast(DDS2.FGROUP2 as D_FLOAT) * (cast(DDS2.DSTNURSERY' +
        '2 as D_FLOAT)) * (cast(DDS2.NETTO as D_FLOAT))) as SUMNETTO'
      'from (select DS1.*, TP.TPSDID, SD2.SDNAME, TP.BRUTTO, TP.NETTO,'
      
        '             FF.FGROUP2, DS1.TNURSERY2 as DSTNURSERY2, TM.TMCATE' +
        'GORY'
      
        '      from (select distinct 1 as NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM,'
      '                            W.WWEEK,'
      ''
      
        '                            (extract(weekday from FP.PDATE)) as ' +
        'WWEEKDEY,'
      '                            FP.TNURSERY2, SM1.MCSDID,'
      '                            SD1.SDNAME as SDNAME1'
      '            from F_PORTION FP'
      
        '            inner join F_WEEK W on FP.PDATE between W.WDATEBEGIN' +
        ' and W.WDATEEND'
      
        '            left join F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' on SP.OMCTYPE = FP.TYPEPORTION and SP.ODATE = FP.PDATE'
      
        '            left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (extract(weekday from FP.PDATE))) SM1 on SM1.OD' +
        'ATE = FP.PDATE and SM1.OMCTYPE = FP.TYPEPORTION and SM1.OMTYPE =' +
        ' 1 and SM1.ONUM = SP.NUM'
      '            left join SYS_DIC SD1 on SD1.SDID = SM1.MCSDID'
      ''
      '            where (SM1.MCSDID is not null) and'
      
        '                  (FP.PDATE between :DATEIN and :DATEOUT) AND fp' +
        '.USERID = CURRENT_USER) DS1'
      ''
      '      left join F_TECHPROD TP on TP.TMID = DS1.MCSDID'
      '      left join SYS_DIC SD2 on SD2.SDID = TP.TPSDID'
      '      left join F_TECHMAP TM on TM.TMSDID = DS1.MCSDID'
      
        '      left join F_FACTOR FF on FF.TYPEFACTOR = TM.TMCATEGORY and' +
        ' DS1.PDATE between FF.DATEBEGIN and FF.DATEEND'
      '      where FF.FISDELETE is null and'
      '            DS1.TNURSERY2 is not null) DDS2'
      'group by 1, 2'
      ''
      '-- '#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080' '#1076#1077#1090' '#1089#1072#1076
      'union'
      'select 3 as NUMM, DDS3.SDNAME,'
      
        '       sum(cast(DDS3.FGROUP5 as D_FLOAT) * (cast(DDS3.DSTNURSERY' +
        'STAFF as D_FLOAT)) * (cast(DDS3.BRUTTO as D_FLOAT))) as SUMBRUTT' +
        'O,'
      
        '       sum(cast(DDS3.FGROUP5 as D_FLOAT) * (cast(DDS3.DSTNURSERY' +
        'STAFF as D_FLOAT)) * (cast(DDS3.NETTO as D_FLOAT))) as SUMNETTO'
      'from (select DS1.*, TP.TPSDID, SD2.SDNAME, TP.BRUTTO, TP.NETTO,'
      '             FF.FGROUP5, DS1.TNURSERYSTAFF as DSTNURSERYSTAFF,'
      '             TM.TMCATEGORY'
      
        '      from (select distinct 1 as NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM,'
      '                            W.WWEEK,'
      ''
      
        '                            (extract(weekday from FP.PDATE)) as ' +
        'WWEEKDEY,'
      '                            FP.TNURSERYSTAFF, SM1.MCSDID,'
      '                            SD1.SDNAME as SDNAME1'
      '            from F_PORTION FP'
      
        '            inner join F_WEEK W on FP.PDATE between W.WDATEBEGIN' +
        ' and W.WDATEEND'
      
        '            left join F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' on SP.OMCTYPE = FP.TYPEPORTION and SP.ODATE = FP.PDATE'
      
        '            left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (extract(weekday from FP.PDATE))) SM1 on SM1.OD' +
        'ATE = FP.PDATE and SM1.OMCTYPE = FP.TYPEPORTION and SM1.OMTYPE =' +
        ' 1 and SM1.ONUM = SP.NUM'
      '            left join SYS_DIC SD1 on SD1.SDID = SM1.MCSDID'
      ''
      '            where (SM1.MCSDID is not null) and'
      
        '                  (FP.PDATE between :DATEIN and :DATEOUT) AND fp' +
        '.USERID = CURRENT_USER) DS1'
      ''
      '      left join F_TECHPROD TP on TP.TMID = DS1.MCSDID'
      '      left join SYS_DIC SD2 on SD2.SDID = TP.TPSDID'
      '      left join F_TECHMAP TM on TM.TMSDID = DS1.MCSDID'
      
        '      left join F_FACTOR FF on FF.TYPEFACTOR = TM.TMCATEGORY and' +
        ' DS1.PDATE between FF.DATEBEGIN and FF.DATEEND'
      '      where FF.FISDELETE is null and'
      '            DS1.TNURSERYSTAFF is not null) DDS3'
      'group by 1, 2'
      ''
      '-- '#1076#1077#1090#1080' '#1085#1072#1095#1072#1083#1100#1085#1072#1103' '#1096#1082#1086#1083#1072
      'union'
      'select 4 as NUMM, DDS4.SDNAME,'
      
        '       sum(cast(DDS4.FGROUP3 as D_FLOAT) * (cast(DDS4.DSTPRIMARY' +
        ' as D_FLOAT)) * (cast(DDS4.BRUTTO as D_FLOAT))) as SUMBRUTTO,'
      
        '       sum(cast(DDS4.FGROUP3 as D_FLOAT) * (cast(DDS4.DSTPRIMARY' +
        ' as D_FLOAT)) * (cast(DDS4.NETTO as D_FLOAT))) as SUMNETTO'
      'from (select DS1.*, TP.TPSDID, SD2.SDNAME, TP.BRUTTO, TP.NETTO,'
      
        '             FF.FGROUP3, DS1.TPRIMARY as DSTPRIMARY, TM.TMCATEGO' +
        'RY'
      
        '      from (select distinct 1 as NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM,'
      '                            W.WWEEK,'
      ''
      
        '                            (extract(weekday from FP.PDATE)) as ' +
        'WWEEKDEY,'
      '                            FP.TPRIMARY, SM1.MCSDID,'
      '                            SD1.SDNAME as SDNAME1'
      '            from F_PORTION FP'
      
        '            inner join F_WEEK W on FP.PDATE between W.WDATEBEGIN' +
        ' and W.WDATEEND'
      
        '            left join F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' on SP.OMCTYPE = FP.TYPEPORTION and SP.ODATE = FP.PDATE'
      
        '            left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 2, ' +
        'SP.NUM, W.WWEEK, (extract(weekday from FP.PDATE))) SM1 on SM1.OD' +
        'ATE = FP.PDATE and SM1.OMCTYPE = FP.TYPEPORTION and SM1.OMTYPE =' +
        ' 2 and SM1.ONUM = SP.NUM'
      '            left join SYS_DIC SD1 on SD1.SDID = SM1.MCSDID'
      ''
      '            where (SM1.MCSDID is not null) and'
      
        '                  (FP.PDATE between :DATEIN and :DATEOUT) AND fp' +
        '.USERID = CURRENT_USER) DS1'
      ''
      '      left join F_TECHPROD TP on TP.TMID = DS1.MCSDID'
      '      left join SYS_DIC SD2 on SD2.SDID = TP.TPSDID'
      '      left join F_TECHMAP TM on TM.TMSDID = DS1.MCSDID'
      
        '      left join F_FACTOR FF on FF.TYPEFACTOR = TM.TMCATEGORY and' +
        ' DS1.PDATE between FF.DATEBEGIN and FF.DATEEND'
      '      where FF.FISDELETE is null and'
      '            DS1.TPRIMARY is not null) DDS4'
      'group by 1, 2'
      ''
      '-- '#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080' '#1085#1072#1095' '#1096#1082#1086#1083#1072
      'union'
      'select 5 as NUMM, DDS5.SDNAME,'
      
        '       sum(cast(DDS5.FGROUP5 as D_FLOAT) * (cast(DDS5.DSTPRIMARY' +
        'STAFF as D_FLOAT)) * (cast(DDS5.BRUTTO as D_FLOAT))) as SUMBRUTT' +
        'O,'
      
        '       sum(cast(DDS5.FGROUP5 as D_FLOAT) * (cast(DDS5.DSTPRIMARY' +
        'STAFF as D_FLOAT)) * (cast(DDS5.NETTO as D_FLOAT))) as SUMNETTO'
      'from (select DS1.*, TP.TPSDID, SD2.SDNAME, TP.BRUTTO, TP.NETTO,'
      '             FF.FGROUP5, DS1.TPRIMARYSTAFF as DSTPRIMARYSTAFF,'
      '             TM.TMCATEGORY'
      
        '      from (select distinct 1 as NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM,'
      '                            W.WWEEK,'
      ''
      
        '                            (extract(weekday from FP.PDATE)) as ' +
        'WWEEKDEY,'
      '                            FP.TPRIMARYSTAFF, SM1.MCSDID,'
      '                            SD1.SDNAME as SDNAME1'
      '            from F_PORTION FP'
      
        '            inner join F_WEEK W on FP.PDATE between W.WDATEBEGIN' +
        ' and W.WDATEEND'
      
        '            left join F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' on SP.OMCTYPE = FP.TYPEPORTION and SP.ODATE = FP.PDATE'
      
        '            left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 2, ' +
        'SP.NUM, W.WWEEK, (extract(weekday from FP.PDATE))) SM1 on SM1.OD' +
        'ATE = FP.PDATE and SM1.OMCTYPE = FP.TYPEPORTION and SM1.OMTYPE =' +
        ' 2 and SM1.ONUM = SP.NUM'
      '            left join SYS_DIC SD1 on SD1.SDID = SM1.MCSDID'
      ''
      '            where (SM1.MCSDID is not null) and'
      
        '                  (FP.PDATE between :DATEIN and :DATEOUT) AND fp' +
        '.USERID = CURRENT_USER) DS1'
      ''
      '      left join F_TECHPROD TP on TP.TMID = DS1.MCSDID'
      '      left join SYS_DIC SD2 on SD2.SDID = TP.TPSDID'
      '      left join F_TECHMAP TM on TM.TMSDID = DS1.MCSDID'
      
        '      left join F_FACTOR FF on FF.TYPEFACTOR = TM.TMCATEGORY and' +
        ' DS1.PDATE between FF.DATEBEGIN and FF.DATEEND'
      '      where FF.FISDELETE is null and'
      '            DS1.TPRIMARYSTAFF is not null) DDS5'
      'group by 1, 2'
      ''
      '--- '#1076#1077#1090#1080' '#1089#1088#1077#1076#1085#1103#1103' '#1096#1082#1086#1083#1072
      'union'
      'select 6 as NUMM, DDS6.SDNAME,'
      
        '       sum(cast(DDS6.FGROUP4 as D_FLOAT) * (cast(DDS6.DSTHIGH as' +
        ' D_FLOAT)) * (cast(DDS6.BRUTTO as D_FLOAT))) as SUMBRUTTO,'
      
        '       sum(cast(DDS6.FGROUP4 as D_FLOAT) * (cast(DDS6.DSTHIGH as' +
        ' D_FLOAT)) * (cast(DDS6.NETTO as D_FLOAT))) as SUMNETTO'
      'from (select DS1.*, TP.TPSDID, SD2.SDNAME, TP.BRUTTO, TP.NETTO,'
      '             FF.FGROUP4, DS1.THIGH as DSTHIGH, TM.TMCATEGORY'
      
        '      from (select distinct 1 as NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM,'
      '                            W.WWEEK,'
      ''
      
        '                            (extract(weekday from FP.PDATE)) as ' +
        'WWEEKDEY,'
      '                            FP.THIGH, SM1.MCSDID,'
      '                            SD1.SDNAME as SDNAME1'
      '            from F_PORTION FP'
      
        '            inner join F_WEEK W on FP.PDATE between W.WDATEBEGIN' +
        ' and W.WDATEEND'
      
        '            left join F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' on SP.OMCTYPE = FP.TYPEPORTION and SP.ODATE = FP.PDATE'
      
        '            left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 3, ' +
        'SP.NUM, W.WWEEK, (extract(weekday from FP.PDATE))) SM1 on SM1.OD' +
        'ATE = FP.PDATE and SM1.OMCTYPE = FP.TYPEPORTION and SM1.OMTYPE =' +
        ' 3 and SM1.ONUM = SP.NUM'
      '            left join SYS_DIC SD1 on SD1.SDID = SM1.MCSDID'
      ''
      '            where (SM1.MCSDID is not null) and'
      
        '                  (FP.PDATE between :DATEIN and :DATEOUT) AND fp' +
        '.USERID = CURRENT_USER) DS1'
      ''
      '      left join F_TECHPROD TP on TP.TMID = DS1.MCSDID'
      '      left join SYS_DIC SD2 on SD2.SDID = TP.TPSDID'
      '      left join F_TECHMAP TM on TM.TMSDID = DS1.MCSDID'
      
        '      left join F_FACTOR FF on FF.TYPEFACTOR = TM.TMCATEGORY and' +
        ' DS1.PDATE between FF.DATEBEGIN and FF.DATEEND'
      '      where FF.FISDELETE is null and'
      '            DS1.THIGH is not null) DDS6'
      'group by 1, 2'
      ''
      '--'#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080' '#1089#1088#1077#1076#1085#1103#1103' '#1096#1082#1086#1083#1072
      'union'
      'select 7 as NUMM, DDS7.SDNAME,'
      
        '       sum(cast(DDS7.FGROUP5 as D_FLOAT) * (cast(DDS7.DSTHIGHSTA' +
        'FF as D_FLOAT)) * (cast(DDS7.BRUTTO as D_FLOAT))) as SUMBRUTTO,'
      
        '       sum(cast(DDS7.FGROUP5 as D_FLOAT) * (cast(DDS7.DSTHIGHSTA' +
        'FF as D_FLOAT)) * (cast(DDS7.NETTO as D_FLOAT))) as SUMNETTO'
      'from (select DS1.*, TP.TPSDID, SD2.SDNAME, TP.BRUTTO, TP.NETTO,'
      '             FF.FGROUP5, DS1.THIGHSTAFF as DSTHIGHSTAFF,'
      '             TM.TMCATEGORY'
      
        '      from (select distinct 1 as NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM,'
      '                            W.WWEEK,'
      ''
      
        '                            (extract(weekday from FP.PDATE)) as ' +
        'WWEEKDEY,'
      '                            FP.THIGHSTAFF, SM1.MCSDID,'
      '                            SD1.SDNAME as SDNAME1'
      '            from F_PORTION FP'
      
        '            inner join F_WEEK W on FP.PDATE between W.WDATEBEGIN' +
        ' and W.WDATEEND'
      
        '            left join F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' on SP.OMCTYPE = FP.TYPEPORTION and SP.ODATE = FP.PDATE'
      
        '            left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 3, ' +
        'SP.NUM, W.WWEEK, (extract(weekday from FP.PDATE))) SM1 on SM1.OD' +
        'ATE = FP.PDATE and SM1.OMCTYPE = FP.TYPEPORTION and SM1.OMTYPE =' +
        ' 3 and SM1.ONUM = SP.NUM'
      '            left join SYS_DIC SD1 on SD1.SDID = SM1.MCSDID'
      ''
      '            where (SM1.MCSDID is not null) and'
      
        '                  (FP.PDATE between :DATEIN and :DATEOUT) AND fp' +
        '.USERID = CURRENT_USER) DS1'
      ''
      '      left join F_TECHPROD TP on TP.TMID = DS1.MCSDID'
      '      left join SYS_DIC SD2 on SD2.SDID = TP.TPSDID'
      '      left join F_TECHMAP TM on TM.TMSDID = DS1.MCSDID'
      
        '      left join F_FACTOR FF on FF.TYPEFACTOR = TM.TMCATEGORY and' +
        ' DS1.PDATE between FF.DATEBEGIN and FF.DATEEND'
      '      where FF.FISDELETE is null and'
      '            DS1.THIGHSTAFF is not null) DDS7'
      'group by 1, 2'
      ''
      '-- '#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080
      'union'
      'select 8 as NUMM, DDS8.SDNAME,'
      
        '       sum(cast(DDS8.FGROUP5 as D_FLOAT) * (cast(DDS8.DSTSTAFF a' +
        's D_FLOAT)) * (cast(DDS8.BRUTTO as D_FLOAT))) as SUMBRUTTO,'
      
        '       sum(cast(DDS8.FGROUP5 as D_FLOAT) * (cast(DDS8.DSTSTAFF a' +
        's D_FLOAT)) * (cast(DDS8.NETTO as D_FLOAT))) as SUMNETTO'
      'from (select DS1.*, TP.TPSDID, SD2.SDNAME, TP.BRUTTO, TP.NETTO,'
      '             FF.FGROUP5, DS1.TSTAFF as DSTSTAFF, TM.TMCATEGORY'
      
        '      from (select distinct 1 as NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM,'
      '                            W.WWEEK,'
      ''
      
        '                            (extract(weekday from FP.PDATE)) as ' +
        'WWEEKDEY,'
      '                            FP.TSTAFF, SM1.MCSDID,'
      '                            SD1.SDNAME as SDNAME1'
      '            from F_PORTION FP'
      
        '            inner join F_WEEK W on FP.PDATE between W.WDATEBEGIN' +
        ' and W.WDATEEND'
      
        '            left join F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' on SP.OMCTYPE = FP.TYPEPORTION and SP.ODATE = FP.PDATE'
      
        '            left join F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 4, ' +
        'SP.NUM, W.WWEEK, (extract(weekday from FP.PDATE))) SM1 on SM1.OD' +
        'ATE = FP.PDATE and SM1.OMCTYPE = FP.TYPEPORTION and SM1.OMTYPE =' +
        ' 4 and SM1.ONUM = SP.NUM'
      '            left join SYS_DIC SD1 on SD1.SDID = SM1.MCSDID'
      ''
      '            where (SM1.MCSDID is not null) and'
      
        '                  (FP.PDATE between :DATEIN and :DATEOUT) AND fp' +
        '.USERID = CURRENT_USER) DS1'
      ''
      '      left join F_TECHPROD TP on TP.TMID = DS1.MCSDID'
      '      left join SYS_DIC SD2 on SD2.SDID = TP.TPSDID'
      '      left join F_TECHMAP TM on TM.TMSDID = DS1.MCSDID'
      
        '      left join F_FACTOR FF on FF.TYPEFACTOR = TM.TMCATEGORY and' +
        ' DS1.PDATE between FF.DATEBEGIN and FF.DATEEND'
      '      where FF.FISDELETE is null and'
      '            DS1.TSTAFF is not null) DDS8'
      'group by 1, 2) FULLDS'
      'group by FULLDS.SDNAME  ')
    GeneratorField.Field = 'SDID'
    Left = 120
    Top = 304
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end>
    object qSumContSDNAME: TIBStringField
      FieldName = 'SDNAME'
      ProviderFlags = []
      Size = 255
    end
    object qSumContSBRUTTO: TFMTBCDField
      FieldName = 'SBRUTTO'
      ProviderFlags = []
      Precision = 18
      Size = 6
    end
    object qSumContSNETTO: TFMTBCDField
      FieldName = 'SNETTO'
      ProviderFlags = []
      Precision = 18
      Size = 6
    end
  end
  object dsTechMap: TDataSource
    DataSet = qTechMap
    Left = 88
    Top = 344
  end
  object qTechMap: TIBQuery
    Database = DMInv.DBRead
    Transaction = DMInv.IBTransaction1
    CachedUpdates = True
    DataSource = dlgDS
    SQL.Strings = (
      'select t.*'
      'from f_techmap t'
      'where t.tmsdid=:sdid'
      'and t.tmisdelete is null')
    GeneratorField.Field = 'SDID'
    Left = 120
    Top = 344
    ParamData = <
      item
        DataType = ftInteger
        Name = 'SDID'
        ParamType = ptUnknown
        Size = 4
      end>
    object qTechMapTMID: TIntegerField
      FieldName = 'TMID'
      Origin = '"F_TECHMAP"."TMID"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object qTechMapTMSDID: TIntegerField
      FieldName = 'TMSDID'
      Origin = '"F_TECHMAP"."TMSDID"'
    end
    object qTechMapCOOKING: TIBStringField
      FieldName = 'COOKING'
      Origin = '"F_TECHMAP"."COOKING"'
      Size = 2048
    end
    object qTechMapYIELD: TIntegerField
      FieldName = 'YIELD'
      Origin = '"F_TECHMAP"."YIELD"'
    end
    object qTechMapENERGYVAL: TIBBCDField
      FieldName = 'ENERGYVAL'
      Origin = '"F_TECHMAP"."ENERGYVAL"'
      Precision = 18
      Size = 2
    end
    object qTechMapPROTEINS: TIBBCDField
      FieldName = 'PROTEINS'
      Origin = '"F_TECHMAP"."PROTEINS"'
      Precision = 18
      Size = 2
    end
    object qTechMapFATS: TIBBCDField
      FieldName = 'FATS'
      Origin = '"F_TECHMAP"."FATS"'
      Precision = 18
      Size = 2
    end
    object qTechMapCARBOHYDRATES: TIBBCDField
      FieldName = 'CARBOHYDRATES'
      Origin = '"F_TECHMAP"."CARBOHYDRATES"'
      Precision = 18
      Size = 2
    end
    object qTechMapCACALCIUM: TIBBCDField
      FieldName = 'CACALCIUM'
      Origin = '"F_TECHMAP"."CACALCIUM"'
      Precision = 18
      Size = 2
    end
    object qTechMapMAGNESIUM: TIBBCDField
      FieldName = 'MAGNESIUM'
      Origin = '"F_TECHMAP"."MAGNESIUM"'
      Precision = 18
      Size = 2
    end
    object qTechMapPHOSPHORUS: TIBBCDField
      FieldName = 'PHOSPHORUS'
      Origin = '"F_TECHMAP"."PHOSPHORUS"'
      Precision = 18
      Size = 2
    end
    object qTechMapFERRUM: TIBBCDField
      FieldName = 'FERRUM'
      Origin = '"F_TECHMAP"."FERRUM"'
      Precision = 18
      Size = 2
    end
    object qTechMapVIT_A: TIBBCDField
      FieldName = 'VIT_A'
      Origin = '"F_TECHMAP"."VIT_A"'
      Precision = 18
      Size = 2
    end
    object qTechMapVIT_B1: TIBBCDField
      FieldName = 'VIT_B1'
      Origin = '"F_TECHMAP"."VIT_B1"'
      Precision = 18
      Size = 2
    end
    object qTechMapVIT_B2: TIBBCDField
      FieldName = 'VIT_B2'
      Origin = '"F_TECHMAP"."VIT_B2"'
      Precision = 18
      Size = 2
    end
    object qTechMapVIT_PP: TIBBCDField
      FieldName = 'VIT_PP'
      Origin = '"F_TECHMAP"."VIT_PP"'
      Precision = 18
      Size = 2
    end
    object qTechMapVIT_C: TIBBCDField
      FieldName = 'VIT_C'
      Origin = '"F_TECHMAP"."VIT_C"'
      Precision = 18
      Size = 2
    end
    object qTechMapVIT_E: TIBBCDField
      FieldName = 'VIT_E'
      Origin = '"F_TECHMAP"."VIT_E"'
      Precision = 18
      Size = 2
    end
    object qTechMapTEMPERATURE: TIBStringField
      FieldName = 'TEMPERATURE'
      Origin = '"F_TECHMAP"."TEMPERATURE"'
      Size = 255
    end
    object qTechMapREALIZATION: TIBStringField
      FieldName = 'REALIZATION'
      Origin = '"F_TECHMAP"."REALIZATION"'
      Size = 255
    end
    object qTechMapNUMCOLLECTION: TIBStringField
      FieldName = 'NUMCOLLECTION'
      Origin = '"F_TECHMAP"."NUMCOLLECTION"'
      Size = 255
    end
    object qTechMapNAMECOLLECTION: TIBStringField
      FieldName = 'NAMECOLLECTION'
      Origin = '"F_TECHMAP"."NAMECOLLECTION"'
      Size = 2048
    end
    object qTechMapTMUSERENTER: TIBStringField
      FieldName = 'TMUSERENTER'
      Origin = '"F_TECHMAP"."TMUSERENTER"'
      Size = 40
    end
    object qTechMapTMTIMEENTER: TDateTimeField
      FieldName = 'TMTIMEENTER'
      Origin = '"F_TECHMAP"."TMTIMEENTER"'
    end
    object qTechMapTMUSEREDIT: TIBStringField
      FieldName = 'TMUSEREDIT'
      Origin = '"F_TECHMAP"."TMUSEREDIT"'
      Size = 40
    end
    object qTechMapTMTIMEEDIT: TDateTimeField
      FieldName = 'TMTIMEEDIT'
      Origin = '"F_TECHMAP"."TMTIMEEDIT"'
    end
    object qTechMapTMISDELETE: TIntegerField
      FieldName = 'TMISDELETE'
      Origin = '"F_TECHMAP"."TMISDELETE"'
    end
    object qTechMapTMNAME: TIBStringField
      FieldName = 'TMNAME'
      Origin = '"F_TECHMAP"."TMNAME"'
      Size = 255
    end
    object qTechMapTMCATEGORY: TIntegerField
      FieldName = 'TMCATEGORY'
      Origin = '"F_TECHMAP"."TMCATEGORY"'
    end
  end
  object dsProd: TDataSource
    DataSet = qProd
    Left = 88
    Top = 384
  end
  object qProd: TIBQuery
    Database = DMInv.DBRead
    Transaction = DMInv.IBTransaction1
    CachedUpdates = True
    DataSource = dlgDS
    SQL.Strings = (
      'Select t.*, sd.sdname'
      'from f_techprod t'
      'inner join sys_dic sd on sd.sdid=t.tpsdid'
      'where t.tmid = :sdid and'
      't.tpisdelete is null')
    GeneratorField.Field = 'SDID'
    Left = 120
    Top = 384
    ParamData = <
      item
        DataType = ftInteger
        Name = 'SDID'
        ParamType = ptUnknown
        Size = 4
      end>
    object qProdTPID: TIntegerField
      FieldName = 'TPID'
      Origin = '"F_TECHPROD"."TPID"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object qProdTMID: TIntegerField
      FieldName = 'TMID'
      Origin = '"F_TECHPROD"."TMID"'
    end
    object qProdTPSDID: TIntegerField
      FieldName = 'TPSDID'
      Origin = '"F_TECHPROD"."TPSDID"'
    end
    object qProdTPUSERENTER: TIBStringField
      FieldName = 'TPUSERENTER'
      Origin = '"F_TECHPROD"."TPUSERENTER"'
      Size = 40
    end
    object qProdTPTIMEENTER: TDateTimeField
      FieldName = 'TPTIMEENTER'
      Origin = '"F_TECHPROD"."TPTIMEENTER"'
    end
    object qProdTPUSEREDIT: TIBStringField
      FieldName = 'TPUSEREDIT'
      Origin = '"F_TECHPROD"."TPUSEREDIT"'
      Size = 40
    end
    object qProdTPTIMEEDIT: TDateTimeField
      FieldName = 'TPTIMEEDIT'
      Origin = '"F_TECHPROD"."TPTIMEEDIT"'
    end
    object qProdTPISDELETE: TIntegerField
      FieldName = 'TPISDELETE'
      Origin = '"F_TECHPROD"."TPISDELETE"'
    end
    object qProdSDNAME: TIBStringField
      FieldName = 'SDNAME'
      Origin = '"SYS_DIC"."SDNAME"'
      Size = 255
    end
    object qProdBRUTTO: TIBBCDField
      FieldName = 'BRUTTO'
      Origin = '"F_TECHPROD"."BRUTTO"'
      Precision = 18
      Size = 4
    end
    object qProdNETTO: TIBBCDField
      FieldName = 'NETTO'
      Origin = '"F_TECHPROD"."NETTO"'
      Precision = 18
      Size = 4
    end
  end
  object sqlSet_f_portion: TIBSQL
    Database = DMInv.DBRead
    SQL.Strings = (
      'EXECUTE PROCEDURE SP_SET_PORTION_COUNT (:date1, :date2, :date3)')
    Transaction = DMInv.IBTransaction1
    Left = 584
    Top = 40
  end
  object dsProdAll: TDataSource
    DataSet = qProd_all
    Left = 89
    Top = 429
  end
  object qProd_all: TIBQuery
    Database = DMInv.DBRead
    Transaction = DMInv.trRead
    SQL.Strings = (
      
        'SELECT s.mcsdid, s.sdname1 AS bljudo, s.tpsdid, s.sdname AS prod' +
        'ukt, CAST(sum(BRUTTO_ALL)/1000.00 AS D_FLOAT4) AS br, CAST(SUM(N' +
        'ETTO_ALL)/1000.00 AS D_FLOAT4) AS net'
      'FROM ('
      ''
      '-- '#1076#1077#1090#1080' 1-3'
      
        'SELECT '#39#1076#1077#1090#1080' 1-3'#39' AS TYPE$, DS1.*, TP.TPSDID, SD2.SDNAME, TP.BRU' +
        'TTO, TP.NETTO, FF.FGROUP1, DS1.TNURSERY1 AS DSTNURSERY1,'
      '       TM.TMCATEGORY,'
      '       (TP.BRUTTO * FF.FGROUP1 * DS1.TNURSERY1) AS BRUTTO_ALL,'
      '       (TP.NETTO * FF.FGROUP1 * DS1.TNURSERY1) AS NETTO_ALL'
      
        'FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, SP.NUM,' +
        ' W.WWEEK,'
      ''
      
        '                      (EXTRACT(WEEKDAY FROM FP.PDATE)) AS WWEEKD' +
        'EY, FP.TNURSERY1, SM1.MCSDID, SD1.SDNAME AS SDNAME1'
      '      FROM F_PORTION FP'
      
        '      INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN AND W' +
        '.WDATEEND'
      
        '      LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP ON SP' +
        '.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '      LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, SP.NUM' +
        ', W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.ODATE = ' +
        'FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE = 1 AND' +
        ' SM1.ONUM = SP.NUM'
      '      LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '      WHERE (SM1.MCSDID IS NOT NULL) AND'
      '            (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '            FP.USERID = CURRENT_USER) DS1'
      ''
      'LEFT JOIN F_TECHPROD TP ON TP.TMID = DS1.MCSDID'
      'LEFT JOIN SYS_DIC SD2 ON SD2.SDID = TP.TPSDID'
      'LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        'LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND DS1.P' +
        'DATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      'WHERE FF.FISDELETE IS NULL AND'
      '      DS1.TNURSERY1 IS NOT NULL'
      '      -- '#1076#1077#1090#1080' 3-5'
      'UNION ALL'
      
        'SELECT '#39#1076#1077#1090#1080' 3-5'#39' AS TYPE$, DS1.*, TP.TPSDID, SD2.SDNAME, TP.BRU' +
        'TTO, TP.NETTO, FF.FGROUP2, DS1.TNURSERY2 AS DSTNURSERY2,'
      '       TM.TMCATEGORY,'
      '       (TP.BRUTTO * FF.FGROUP2 * DS1.TNURSERY2) AS BRUTTO_ALL,'
      '       (TP.NETTO * FF.FGROUP2 * DS1.TNURSERY2) AS NETTO_ALL'
      
        'FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, SP.NUM,' +
        ' W.WWEEK,'
      ''
      
        '                      (EXTRACT(WEEKDAY FROM FP.PDATE)) AS WWEEKD' +
        'EY, FP.TNURSERY2, SM1.MCSDID, SD1.SDNAME AS SDNAME1'
      '      FROM F_PORTION FP'
      
        '      INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN AND W' +
        '.WDATEEND'
      
        '      LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP ON SP' +
        '.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '      LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, SP.NUM' +
        ', W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.ODATE = ' +
        'FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE = 1 AND' +
        ' SM1.ONUM = SP.NUM'
      '      LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '      WHERE (SM1.MCSDID IS NOT NULL) AND'
      '            (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '            FP.USERID = CURRENT_USER) DS1'
      ''
      'LEFT JOIN F_TECHPROD TP ON TP.TMID = DS1.MCSDID'
      'LEFT JOIN SYS_DIC SD2 ON SD2.SDID = TP.TPSDID'
      'LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        'LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND DS1.P' +
        'DATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      'WHERE FF.FISDELETE IS NULL AND'
      '      DS1.TNURSERY2 IS NOT NULL'
      ''
      '      -- '#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080' '#1076#1077#1090' '#1089#1072#1076
      'UNION ALL'
      
        'SELECT '#39#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080' '#1076#1077#1090' '#1089#1072#1076#39' AS TYPE$, DS1.*, TP.TPSDID, SD2.SDNA' +
        'ME, TP.BRUTTO, TP.NETTO, FF.FGROUP5,'
      '       DS1.TNURSERYSTAFF AS DSTNURSERYSTAFF, TM.TMCATEGORY,'
      
        '       (TP.BRUTTO * FF.FGROUP5 * DS1.TNURSERYSTAFF) AS BRUTTO_AL' +
        'L,'
      '       (TP.NETTO * FF.FGROUP5 * DS1.TNURSERYSTAFF) AS NETTO_ALL'
      
        'FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, SP.NUM,' +
        ' W.WWEEK,'
      ''
      
        '                      (EXTRACT(WEEKDAY FROM FP.PDATE)) AS WWEEKD' +
        'EY, FP.TNURSERYSTAFF, SM1.MCSDID,'
      '                      SD1.SDNAME AS SDNAME1'
      '      FROM F_PORTION FP'
      
        '      INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN AND W' +
        '.WDATEEND'
      
        '      LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP ON SP' +
        '.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '      LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, SP.NUM' +
        ', W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.ODATE = ' +
        'FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE = 1 AND' +
        ' SM1.ONUM = SP.NUM'
      '      LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '      WHERE (SM1.MCSDID IS NOT NULL) AND'
      '            (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '            FP.USERID = CURRENT_USER) DS1'
      ''
      'LEFT JOIN F_TECHPROD TP ON TP.TMID = DS1.MCSDID'
      'LEFT JOIN SYS_DIC SD2 ON SD2.SDID = TP.TPSDID'
      'LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        'LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND DS1.P' +
        'DATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      'WHERE FF.FISDELETE IS NULL AND'
      '      DS1.TNURSERYSTAFF IS NOT NULL'
      ''
      '      -- '#1076#1077#1090#1080' '#1085#1072#1095#1072#1083#1100#1085#1072#1103' '#1096#1082#1086#1083#1072
      'UNION ALL'
      
        'SELECT '#39#1076#1077#1090#1080' '#1085#1072#1095#1072#1083#1100#1085#1072#1103' '#1096#1082#1086#1083#1072#39' AS TYPE$, DS1.*, TP.TPSDID, SD2.SD' +
        'NAME, TP.BRUTTO, TP.NETTO, FF.FGROUP3,'
      '       DS1.TPRIMARY AS DSTPRIMARY, TM.TMCATEGORY,'
      '       (TP.BRUTTO * FF.FGROUP3 * DS1.TPRIMARY) AS BRUTTO_ALL,'
      '       (TP.NETTO * FF.FGROUP3 * DS1.TPRIMARY) AS NETTO_ALL'
      
        'FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, SP.NUM,' +
        ' W.WWEEK,'
      ''
      
        '                      (EXTRACT(WEEKDAY FROM FP.PDATE)) AS WWEEKD' +
        'EY, FP.TPRIMARY, SM1.MCSDID, SD1.SDNAME AS SDNAME1'
      '      FROM F_PORTION FP'
      
        '      INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN AND W' +
        '.WDATEEND'
      
        '      LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP ON SP' +
        '.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '      LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 2, SP.NUM' +
        ', W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.ODATE = ' +
        'FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE = 2 AND' +
        ' SM1.ONUM = SP.NUM'
      '      LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '      WHERE (SM1.MCSDID IS NOT NULL) AND'
      '            (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '            FP.USERID = CURRENT_USER) DS1'
      ''
      'LEFT JOIN F_TECHPROD TP ON TP.TMID = DS1.MCSDID'
      'LEFT JOIN SYS_DIC SD2 ON SD2.SDID = TP.TPSDID'
      'LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        'LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND DS1.P' +
        'DATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      'WHERE FF.FISDELETE IS NULL AND'
      '      DS1.TPRIMARY IS NOT NULL'
      '      -- '#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080' '#1085#1072#1095' '#1096#1082#1086#1083#1072
      'UNION ALL'
      
        'SELECT '#39#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080' '#1085#1072#1095' '#1096#1082#1086#1083#1072#39' AS TYPE$, DS1.*, TP.TPSDID, SD2.SD' +
        'NAME, TP.BRUTTO, TP.NETTO, FF.FGROUP5,'
      '       DS1.TPRIMARYSTAFF AS DSTPRIMARYSTAFF, TM.TMCATEGORY,'
      
        '       (TP.BRUTTO * FF.FGROUP5 * DS1.TPRIMARYSTAFF) AS BRUTTO_AL' +
        'L,'
      '       (TP.NETTO * FF.FGROUP5 * DS1.TPRIMARYSTAFF) AS NETTO_ALL'
      
        'FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, SP.NUM,' +
        ' W.WWEEK,'
      ''
      
        '                      (EXTRACT(WEEKDAY FROM FP.PDATE)) AS WWEEKD' +
        'EY, FP.TPRIMARYSTAFF, SM1.MCSDID,'
      '                      SD1.SDNAME AS SDNAME1'
      '      FROM F_PORTION FP'
      
        '      INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN AND W' +
        '.WDATEEND'
      
        '      LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP ON SP' +
        '.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '      LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 2, SP.NUM' +
        ', W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.ODATE = ' +
        'FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE = 2 AND' +
        ' SM1.ONUM = SP.NUM'
      '      LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '      WHERE (SM1.MCSDID IS NOT NULL) AND'
      '            (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '            FP.USERID = CURRENT_USER) DS1'
      ''
      'LEFT JOIN F_TECHPROD TP ON TP.TMID = DS1.MCSDID'
      'LEFT JOIN SYS_DIC SD2 ON SD2.SDID = TP.TPSDID'
      'LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        'LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND DS1.P' +
        'DATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      'WHERE FF.FISDELETE IS NULL AND'
      '      DS1.TPRIMARYSTAFF IS NOT NULL'
      ''
      '      --- '#1076#1077#1090#1080' '#1089#1088#1077#1076#1085#1103#1103' '#1096#1082#1086#1083#1072
      'UNION ALL'
      
        'SELECT '#39#1076#1077#1090#1080' '#1089#1088#1077#1076#1085#1103#1103' '#1096#1082#1086#1083#1072#39' AS TYPE$, DS1.*, TP.TPSDID, SD2.SDNA' +
        'ME, TP.BRUTTO, TP.NETTO, FF.FGROUP4,'
      '       DS1.THIGH AS DSTHIGH, TM.TMCATEGORY,'
      '       (TP.BRUTTO * FF.FGROUP4 * DS1.THIGH) AS BRUTTO_ALL,'
      '       (TP.NETTO * FF.FGROUP4 * DS1.THIGH) AS NETTO_ALL'
      
        'FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, SP.NUM,' +
        ' W.WWEEK,'
      ''
      
        '                      (EXTRACT(WEEKDAY FROM FP.PDATE)) AS WWEEKD' +
        'EY, FP.THIGH, SM1.MCSDID, SD1.SDNAME AS SDNAME1'
      '      FROM F_PORTION FP'
      
        '      INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN AND W' +
        '.WDATEEND'
      
        '      LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP ON SP' +
        '.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '      LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 3, SP.NUM' +
        ', W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.ODATE = ' +
        'FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE = 3 AND' +
        ' SM1.ONUM = SP.NUM'
      '      LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '      WHERE (SM1.MCSDID IS NOT NULL) AND'
      '            (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '            FP.USERID = CURRENT_USER) DS1'
      ''
      'LEFT JOIN F_TECHPROD TP ON TP.TMID = DS1.MCSDID'
      'LEFT JOIN SYS_DIC SD2 ON SD2.SDID = TP.TPSDID'
      'LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        'LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND DS1.P' +
        'DATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      'WHERE FF.FISDELETE IS NULL AND'
      '      DS1.THIGH IS NOT NULL'
      ''
      '      --'#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080' '#1089#1088#1077#1076#1085#1103#1103' '#1096#1082#1086#1083#1072
      'UNION ALL'
      
        'SELECT '#39#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080' '#1089#1088#1077#1076#1085#1103#1103' '#1096#1082#1086#1083#1072#39' AS TYPE$, DS1.*, TP.TPSDID, SD' +
        '2.SDNAME, TP.BRUTTO, TP.NETTO, FF.FGROUP5,'
      '       DS1.THIGHSTAFF AS DSTHIGHSTAFF, TM.TMCATEGORY,'
      '       (TP.BRUTTO * FF.FGROUP5 * DS1.THIGHSTAFF) AS BRUTTO_ALL,'
      '       (TP.NETTO * FF.FGROUP5 * DS1.THIGHSTAFF) AS NETTO_ALL'
      
        'FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, SP.NUM,' +
        ' W.WWEEK,'
      ''
      
        '                      (EXTRACT(WEEKDAY FROM FP.PDATE)) AS WWEEKD' +
        'EY, FP.THIGHSTAFF, SM1.MCSDID, SD1.SDNAME AS SDNAME1'
      '      FROM F_PORTION FP'
      
        '      INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN AND W' +
        '.WDATEEND'
      
        '      LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP ON SP' +
        '.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '      LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 3, SP.NUM' +
        ', W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.ODATE = ' +
        'FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE = 3 AND' +
        ' SM1.ONUM = SP.NUM'
      '      LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '      WHERE (SM1.MCSDID IS NOT NULL) AND'
      '            (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '            FP.USERID = CURRENT_USER) DS1'
      ''
      'LEFT JOIN F_TECHPROD TP ON TP.TMID = DS1.MCSDID'
      'LEFT JOIN SYS_DIC SD2 ON SD2.SDID = TP.TPSDID'
      'LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        'LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND DS1.P' +
        'DATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      'WHERE FF.FISDELETE IS NULL AND'
      '      DS1.THIGHSTAFF IS NOT NULL'
      ''
      '      -- '#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080
      'UNION ALL'
      
        'SELECT '#39#1089#1086#1090#1088#1091#1076#1085#1080#1082#1080#39' AS TYPE$, DS1.*, TP.TPSDID, SD2.SDNAME, TP.B' +
        'RUTTO, TP.NETTO, FF.FGROUP5, DS1.TSTAFF AS DSTSTAFF,'
      '       TM.TMCATEGORY,'
      '       (TP.BRUTTO * FF.FGROUP5 * DS1.TSTAFF) AS BRUTTO_ALL,'
      '       (TP.NETTO * FF.FGROUP5 * DS1.TSTAFF) AS NETTO_ALL'
      
        'FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, SP.NUM,' +
        ' W.WWEEK,'
      ''
      
        '                      (EXTRACT(WEEKDAY FROM FP.PDATE)) AS WWEEKD' +
        'EY, FP.TSTAFF, SM1.MCSDID, SD1.SDNAME AS SDNAME1'
      '      FROM F_PORTION FP'
      
        '      INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN AND W' +
        '.WDATEEND'
      
        '      LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP ON SP' +
        '.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '      LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 4, SP.NUM' +
        ', W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.ODATE = ' +
        'FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE = 4 AND' +
        ' SM1.ONUM = SP.NUM'
      '      LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '      WHERE (SM1.MCSDID IS NOT NULL) AND'
      '            (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '            FP.USERID = CURRENT_USER) DS1'
      ''
      'LEFT JOIN F_TECHPROD TP ON TP.TMID = DS1.MCSDID'
      'LEFT JOIN SYS_DIC SD2 ON SD2.SDID = TP.TPSDID'
      'LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        'LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND DS1.P' +
        'DATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      'WHERE FF.FISDELETE IS NULL AND'
      '      DS1.TSTAFF IS NOT NULL) AS s'
      'GROUP BY 1,2,3,4')
    Left = 121
    Top = 429
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end>
    object qProd_allMCSDID: TIntegerField
      FieldName = 'MCSDID'
      ProviderFlags = []
    end
    object qProd_allBLJUDO: TIBStringField
      FieldName = 'BLJUDO'
      ProviderFlags = []
      Size = 255
    end
    object qProd_allTPSDID: TIntegerField
      FieldName = 'TPSDID'
      ProviderFlags = []
    end
    object qProd_allPRODUKT: TIBStringField
      FieldName = 'PRODUKT'
      ProviderFlags = []
      Size = 255
    end
    object qProd_allBR: TIBBCDField
      FieldName = 'BR'
      ProviderFlags = []
      Precision = 18
      Size = 4
    end
    object qProd_allNET: TIBBCDField
      FieldName = 'NET'
      ProviderFlags = []
      Precision = 18
      Size = 4
    end
  end
  object SD1: TSaveDialog
    InitialDir = 'c:\'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Left = 80
    Top = 160
  end
  object qProdPodr: TIBQuery
    Database = DMInv.DBRead
    Transaction = DMInv.trRead
    SQL.Strings = (
      'SELECT s.*,'
      '       case'
      'when s.TYPEPORTION = 0 then '#39#1047#1072#1074#1090#1088#1072#1082' '#8470'0 '#39
      'when s.TYPEPORTION = 1 then '#39#1047#1072#1074#1090#1088#1072#1082' '#8470'1 '#39
      '         when s.TYPEPORTION = 2 then '#39#1047#1072#1074#1090#1088#1072#1082' '#8470'2 '#39
      '         when s.TYPEPORTION = 3 then '#39#1054#1073#1077#1076' '#39
      '         when s.TYPEPORTION = 4 then '#39#1055#1086#1083#1076#1085#1080#1082' '#39
      '         when s.TYPEPORTION = 5 then '#39#1059#1078#1080#1085' '#8470'1 '#39
      '         when s.TYPEPORTION = 6 then '#39#1059#1078#1080#1085' '#8470'2 '#39
      '       end as priem'
      'FROM'
      '('
      
        'SELECT '#39#1044'/'#1057#39' AS TIP, S_DS.MCSDID, S_DS.SDNAME1, S_DS.TYPEPORTION' +
        ', SUM(S_DS.VYHOD) AS VYHOD'
      
        'FROM (SELECT DS1.*, TM.TMSDID, FF.FGROUP1, DS1.TNURSERY1 AS DSTN' +
        'URSERY1, TM.TMCATEGORY,'
      '             (0.1 * FF.FGROUP1 * DS1.TNURSERY1) AS VYHOD'
      
        '      FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM, W.WWEEK,'
      ''
      
        '                            (EXTRACT(WEEKDAY FROM FP.PDATE)) AS ' +
        'WWEEKDEY, FP.TNURSERY1, SM1.MCSDID,'
      '                            SD1.SDNAME AS SDNAME1'
      '            FROM F_PORTION FP'
      
        '            INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN' +
        ' AND W.WDATEEND'
      
        '            LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' ON SP.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '            LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.OD' +
        'ATE = FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE =' +
        ' 1 AND SM1.ONUM = SP.NUM'
      '            LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '            WHERE (SM1.MCSDID IS NOT NULL) AND'
      '                  (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '                  FP.USERID = CURRENT_USER) DS1'
      '      LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        '      LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND' +
        ' DS1.PDATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      '      WHERE FF.FISDELETE IS NULL AND'
      '            DS1.TNURSERY1 IS NOT NULL'
      '      UNION ALL'
      
        '      SELECT DS1.*, TM.TMSDID, FF.FGROUP1, DS1.TNURSERY2 AS DSTN' +
        'URSERY1, TM.TMCATEGORY,'
      '             (0.1 * FF.FGROUP1 * DS1.TNURSERY2) AS VYHOD'
      
        '      FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM, W.WWEEK,'
      ''
      
        '                            (EXTRACT(WEEKDAY FROM FP.PDATE)) AS ' +
        'WWEEKDEY, FP.TNURSERY2, SM1.MCSDID,'
      '                            SD1.SDNAME AS SDNAME1'
      '            FROM F_PORTION FP'
      
        '            INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN' +
        ' AND W.WDATEEND'
      
        '            LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' ON SP.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '            LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.OD' +
        'ATE = FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE =' +
        ' 1 AND SM1.ONUM = SP.NUM'
      '            LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '            WHERE (SM1.MCSDID IS NOT NULL) AND'
      '                  (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '                  FP.USERID = CURRENT_USER) DS1'
      '      LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        '      LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND' +
        ' DS1.PDATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      '      WHERE FF.FISDELETE IS NULL AND'
      '            DS1.TNURSERY2 IS NOT NULL'
      '      UNION ALL'
      
        '      SELECT DS1.*, TM.TMSDID, FF.FGROUP5, DS1.TNURSERYSTAFF AS ' +
        'DSTNURSERY1, TM.TMCATEGORY,'
      '             (0.1 * FF.FGROUP5 * DS1.TNURSERYSTAFF) AS VYHOD'
      
        '      FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM, W.WWEEK,'
      ''
      
        '                            (EXTRACT(WEEKDAY FROM FP.PDATE)) AS ' +
        'WWEEKDEY, FP.TNURSERYSTAFF, SM1.MCSDID,'
      '                            SD1.SDNAME AS SDNAME1'
      '            FROM F_PORTION FP'
      
        '            INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN' +
        ' AND W.WDATEEND'
      
        '            LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' ON SP.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '            LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.OD' +
        'ATE = FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE =' +
        ' 1 AND SM1.ONUM = SP.NUM'
      '            LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '            WHERE (SM1.MCSDID IS NOT NULL) AND'
      '                  (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '                  FP.USERID = CURRENT_USER) DS1'
      ''
      ''
      '      LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        '      LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND' +
        ' DS1.PDATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      '      WHERE FF.FISDELETE IS NULL AND'
      '            DS1.TNURSERYSTAFF IS NOT NULL) AS S_DS'
      'GROUP BY 1, 2, 3, 4'
      'UNION ALL'
      
        'SELECT '#39#1043#1080#1084#1085#1072#1079#1080#1103#39' AS TIP, S_DS.MCSDID, S_DS.SDNAME1, S_DS.TYPEPO' +
        'RTION, SUM(S_DS.VYHOD) AS VYHOD'
      
        'FROM (SELECT DS1.*, TM.TMSDID, FF.FGROUP3, DS1.TPRIMARY AS DSTNU' +
        'RSERY1, TM.TMCATEGORY,'
      '             (0.1 * FF.FGROUP3 * DS1.TPRIMARY) AS VYHOD'
      
        '      FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM, W.WWEEK,'
      ''
      
        '                            (EXTRACT(WEEKDAY FROM FP.PDATE)) AS ' +
        'WWEEKDEY, FP.TPRIMARY, SM1.MCSDID,'
      '                            SD1.SDNAME AS SDNAME1'
      '            FROM F_PORTION FP'
      
        '            INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN' +
        ' AND W.WDATEEND'
      
        '            LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' ON SP.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '            LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.OD' +
        'ATE = FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE =' +
        ' 1 AND SM1.ONUM = SP.NUM'
      '            LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '            WHERE (SM1.MCSDID IS NOT NULL) AND'
      '                  (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '                  FP.USERID = CURRENT_USER) DS1'
      '      LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        '      LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND' +
        ' DS1.PDATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      '      WHERE FF.FISDELETE IS NULL AND'
      '            DS1.TPRIMARY IS NOT NULL'
      ''
      '      UNION ALL'
      
        '      SELECT DS1.*, TM.TMSDID, FF.FGROUP5, DS1.TPRIMARYSTAFF AS ' +
        'DSTNURSERY1, TM.TMCATEGORY,'
      '             (0.1 * FF.FGROUP5 * DS1.TPRIMARYSTAFF) AS VYHOD'
      
        '      FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM, W.WWEEK,'
      ''
      
        '                            (EXTRACT(WEEKDAY FROM FP.PDATE)) AS ' +
        'WWEEKDEY, FP.TPRIMARYSTAFF, SM1.MCSDID,'
      '                            SD1.SDNAME AS SDNAME1'
      '            FROM F_PORTION FP'
      
        '            INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN' +
        ' AND W.WDATEEND'
      
        '            LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' ON SP.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '            LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.OD' +
        'ATE = FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE =' +
        ' 1 AND SM1.ONUM = SP.NUM'
      '            LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '            WHERE (SM1.MCSDID IS NOT NULL) AND'
      '                  (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '                  FP.USERID = CURRENT_USER) DS1'
      ''
      ''
      '      LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        '      LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND' +
        ' DS1.PDATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      '      WHERE FF.FISDELETE IS NULL AND'
      '            DS1.TPRIMARYSTAFF IS NOT NULL) AS S_DS'
      'GROUP BY 1, 2, 3, 4'
      'UNION ALL'
      
        'SELECT '#39#1064#1082#1086#1083#1072#39' AS TIP, S_DS.MCSDID, S_DS.SDNAME1, S_DS.TYPEPORTI' +
        'ON, SUM(S_DS.VYHOD) AS VYHOD'
      
        'FROM (SELECT DS1.*, TM.TMSDID, FF.FGROUP4, DS1.THIGH AS DSTNURSE' +
        'RY1, TM.TMCATEGORY,'
      '             (0.1 * FF.FGROUP4 * DS1.THIGH) AS VYHOD'
      
        '      FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM, W.WWEEK,'
      ''
      
        '                            (EXTRACT(WEEKDAY FROM FP.PDATE)) AS ' +
        'WWEEKDEY, FP.THIGH, SM1.MCSDID,'
      '                            SD1.SDNAME AS SDNAME1'
      '            FROM F_PORTION FP'
      
        '            INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN' +
        ' AND W.WDATEEND'
      
        '            LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' ON SP.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '            LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.OD' +
        'ATE = FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE =' +
        ' 1 AND SM1.ONUM = SP.NUM'
      '            LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '            WHERE (SM1.MCSDID IS NOT NULL) AND'
      '                  (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '                  FP.USERID = CURRENT_USER) DS1'
      '      LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        '      LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND' +
        ' DS1.PDATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      '      WHERE FF.FISDELETE IS NULL AND'
      '            DS1.THIGH IS NOT NULL'
      ''
      '      UNION ALL'
      
        '      SELECT DS1.*, TM.TMSDID, FF.FGROUP5, DS1.THIGHSTAFF AS DST' +
        'NURSERY1, TM.TMCATEGORY,'
      '             (0.1 * FF.FGROUP5 * DS1.THIGHSTAFF) AS VYHOD'
      
        '      FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM, W.WWEEK,'
      ''
      
        '                            (EXTRACT(WEEKDAY FROM FP.PDATE)) AS ' +
        'WWEEKDEY, FP.THIGHSTAFF, SM1.MCSDID,'
      '                            SD1.SDNAME AS SDNAME1'
      '            FROM F_PORTION FP'
      
        '            INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN' +
        ' AND W.WDATEEND'
      
        '            LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' ON SP.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '            LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.OD' +
        'ATE = FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE =' +
        ' 1 AND SM1.ONUM = SP.NUM'
      '            LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '            WHERE (SM1.MCSDID IS NOT NULL) AND'
      '                  (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '                  FP.USERID = CURRENT_USER) DS1'
      ''
      ''
      '      LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        '      LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND' +
        ' DS1.PDATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      '      WHERE FF.FISDELETE IS NULL AND'
      '            DS1.THIGHSTAFF IS NOT NULL) AS S_DS'
      'GROUP BY 1, 2, 3, 4'
      'UNION ALL'
      
        'SELECT '#39#1057#1086#1090#1088#1091#1076#1085#1080#1082#1080#39' AS TIP, S_DS.MCSDID, S_DS.SDNAME1, S_DS.TYPE' +
        'PORTION, SUM(S_DS.VYHOD) AS VYHOD'
      'FROM ('
      
        '      SELECT DS1.*, TM.TMSDID, FF.FGROUP5, DS1.TSTAFF AS DSTNURS' +
        'ERY1, TM.TMCATEGORY,'
      '             (0.1 * FF.FGROUP5 * DS1.TSTAFF) AS VYHOD'
      
        '      FROM (SELECT DISTINCT 1 AS NN, FP.PDATE, FP.TYPEPORTION, S' +
        'P.NUM, W.WWEEK,'
      ''
      
        '                            (EXTRACT(WEEKDAY FROM FP.PDATE)) AS ' +
        'WWEEKDEY, FP.TSTAFF, SM1.MCSDID,'
      '                            SD1.SDNAME AS SDNAME1'
      '            FROM F_PORTION FP'
      
        '            INNER JOIN F_WEEK W ON FP.PDATE BETWEEN W.WDATEBEGIN' +
        ' AND W.WDATEEND'
      
        '            LEFT JOIN F_SELECTCOUNT(FP.TYPEPORTION, FP.PDATE) SP' +
        ' ON SP.OMCTYPE = FP.TYPEPORTION AND SP.ODATE = FP.PDATE'
      
        '            LEFT JOIN F_SELECTMENU(FP.PDATE, FP.TYPEPORTION, 1, ' +
        'SP.NUM, W.WWEEK, (EXTRACT(WEEKDAY FROM FP.PDATE))) SM1 ON SM1.OD' +
        'ATE = FP.PDATE AND SM1.OMCTYPE = FP.TYPEPORTION AND SM1.OMTYPE =' +
        ' 1 AND SM1.ONUM = SP.NUM'
      '            LEFT JOIN SYS_DIC SD1 ON SD1.SDID = SM1.MCSDID'
      ''
      '            WHERE (SM1.MCSDID IS NOT NULL) AND'
      '                  (FP.PDATE BETWEEN :DATEIN AND :DATEOUT) AND'
      '                  FP.USERID = CURRENT_USER) DS1'
      ''
      ''
      '      LEFT JOIN F_TECHMAP TM ON TM.TMSDID = DS1.MCSDID'
      
        '      LEFT JOIN F_FACTOR FF ON FF.TYPEFACTOR = TM.TMCATEGORY AND' +
        ' DS1.PDATE BETWEEN FF.DATEBEGIN AND FF.DATEEND'
      '      WHERE FF.FISDELETE IS NULL AND'
      '            DS1.TSTAFF IS NOT NULL) AS S_DS'
      'GROUP BY 1, 2, 3, 4'
      ') AS s')
    Left = 121
    Top = 461
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEIN'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'DATEOUT'
        ParamType = ptUnknown
      end>
    object qProdPodrTIP: TIBStringField
      FieldName = 'TIP'
      ProviderFlags = []
      FixedChar = True
      Size = 10
    end
    object qProdPodrMCSDID: TIntegerField
      FieldName = 'MCSDID'
      ProviderFlags = []
    end
    object qProdPodrSDNAME1: TIBStringField
      FieldName = 'SDNAME1'
      ProviderFlags = []
      Size = 255
    end
    object qProdPodrTYPEPORTION: TIntegerField
      FieldName = 'TYPEPORTION'
      ProviderFlags = []
    end
    object qProdPodrVYHOD: TIBBCDField
      FieldName = 'VYHOD'
      ProviderFlags = []
      Precision = 18
      Size = 3
    end
    object qProdPodrPRIEM: TIBStringField
      FieldName = 'PRIEM'
      ProviderFlags = []
      FixedChar = True
      Size = 11
    end
  end
  object dsProdPodr: TDataSource
    DataSet = qProdPodr
    Left = 89
    Top = 461
  end
end
